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se Evaluación 
u del Hardware 


NTES de hablar de es- 
pecificaciones técni- 
cas vamos a aclarar 
una serie de concep- 
tos básicos a los que 
haremos referencia 
más adelante. 


Hardware 


Se entiende por hardware el conjunto 
de componentes físicos que constituyen 
el ordenador. En anteriores capítulos he- 
mos hecho una definición de ellos; sin 
embargo, vamos a recordarlos: 


Circultería 
física 


Sist. operativo 
lenguajes... 


Documentación 
mantenimiento 


=> 


ÍA No sólo hay que sopesar en el análisis de 
un ordenador su estructura física; las posi- 


bilidades de programación y documentación 
también son decisivas. 


El procesador. Es el elemento base de 
la parte física del ordenador. Su función 
es la de procesar los datos, para lo cual 
debe estar conectado, por un lado, a los 
periféricos de entrada/salida, y por otro, 
a la memoria de masa, los cuales se en- 
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cargan de proporcionar al procesador la 
información a tratar. 

La memoria principal. Su función es al- 
macenar la información que produce el 
procesador al ir desarrollando las instruc- 
ciones de su programa. Esta información 
se podrá ir almacenando en zonas de al- 
macenamiento permanente (memoria 
de masa) o bien ser borrada, al ejecutar- 
se un nuevo programa. 

Memorias de masa. Sirven fundamen- 
talmente para almacenar: 


— Ficheros de usuario. 
— Los programas de aplicaciones del 
usuario. 


El almacenamiento se puede realizar 
en cualquier soporte (cinta, disco, dis- 
quete, casete), pero se usa el disco pre- 
ferentemente porque es más rápido que 
los anteriores. 

A continuación se incluye un cuestio- 
nario de datos técnicos y económicos 
cuya recomendación se hace a los usua- 
rios a la hora de requerir información téc- 
nica de los constructores. 


1. Para la unidad central de proceso 


— Longitud de la palabra y de la ins- 
trucción. 

— Características del repertorio de 
instrucciones. 

— Descripción del sistema de protec- 
ción de memoria. 

— Descripción del sistema de direc- 
cionamiento. 

— Descripción del sistema de interrup- 
ciones. 


2. Para la memoria principal 


— Capacidad propuesta. 
— Capacidad máxima. 
— Tipo de construcción. 
— Corrección de errores. 


3. Unidades de discos 


— Capacidad por “dispack” en bytes. 
— Velocidad de transferencia. 
— Tiempo medio de acceso. 
— Expresión de si puede servir como 
soporte del sistema operativo. 


RANURA DE ACCESO 
DE LA CABEZA 


DE 12 A 16 SECTORES 
PISTAS 


Tanto la capacidad de almacenamiento 
en “dis-pack” como las características de 

los disquetes utilizados son puntos importantes a 

tener en cuenta a la hora de elegir un sistema. 


4. Pantallas 


— Tamaño de la pantalla. 

— Capacidad de la pantalla. 

— Número de caracteres. 

— Distintas intensidades de ilumina- 
ción de pantalla. 


Evaluación del software 


Software 


El software lo constituyen los elementos 
lógicos, frente al hadware, que lo forman 
los dispositivos físicos que conforman el 
ordenador. A la hora de comprar un or- 
denador, una elección adecuada del 
software es esencial para el buen apro- 
vechamiento del equipo. La decisión 
vendrá influenciada, por un lado, por el 
software de base, y por otro, por el soft- 
ware de aplicaciones disponibles para 
el sistema. 


Sistema operativo. Es el soporte básico 
que permite extraer las posibilidades del 
hardware y hacerlas asequibles al pro- 
gramador. El sistema operativo lo consti- 
tuyen un conjunto de reglas establecidas 
en un ordenador para su correcta utiliza- 
ción. El sistema operativo debe asegurar 
la carga, supervisión y ejecución de los 
programas, el control de las operaciones 
de entrada/salida, la asignación de me- 
moria, detección y corrección de erro- 
res, etc. Los sistemas operativos pueden 


trabajar en “batch” —ejecución de una 
o más tareas secuencialmente con ali- 
mentación previa de todos los datos—, 
en modo “interactivo” —que permite la 
entrada de datos durante la ejecución 
del proceso— en “tiempo real” —me- 
diante el cual el sistema responde a las 
demandas externas según un concepto 
de prioridades— o en “tiempo comparti- 
do” —muchos usuarios pueden acceder 
al sistema simultáneamente y compartir 
todos sus recursos (memoria, ficheros, 
dispositivos...). 


Lenguajes de programación. Son las 
herramientas que permiten elaborar los 
programas ejecutables por el procesa- 
dor. Estos programas pueden formar par- 
te de las aplicaciones de los usuarios o 
bien del sistema operativo. 

Si se trata de lenguajes orientados al 
sistema operativo, éstos serán de bajo ni- 
vel y suponen una rápida y fácil ejecu- 
ción. Si se trata de lenguajes orientados 
al usuario, conocidos como lenguajes de 
alto nivel, suponen un potente desarrollo 
y una mayor facilidad de utilización para 
el programador. 

El ensamblador es un lenguaje orienta- 
do a la máquina y es importante para la 
preparación de otros programas. Se escri- 
be en un formato simplificado y utiliza có- 
digos nemotécnicos y direcciones de 
operandos simbólicas, produciendo un 
programa listo para su ejecución, una 
vez que las direcciones simbólicas hayan 
sido convertidas en otras de máquina, 
que son las únicas que el ordenador en- 
tiende. 

En cuanto a los lenguajes orientados al 
usuario, deben incluir su correspondien- 
te compilador, que es quien se encarga 
de traducir cada instrucción a lenguaje 
máquina. La adopción de uno o más len- 
guajes lleva consigo no sólo aumento de 
coste de ellos, sino también de los com- 
piladores para cada uno. Los lenguajes 
simbólicos más conocidos son: destina- 
dos a gestión, como el RPG o el COBOL; 
otros de carácter científico, como el FOR- 
TRAN y el ALGOL, y otros de carácter ge- 
neral, como el BASIC. 

Por último, es muy importante considerar 
también los programas de aplicación 
ofrecidos por el suministrador, tales 
como los “sorts” y los de mantenimiento 
de ficheros, y las aplicaciones estándar 
como: bases de datos, tratamiento de 
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textos, hojas electrónicas, aplicaciones 
gráficas, etc. 


' Cuestionario de software 


1. Sistemas operativos 


— Tipo de sistema operativo. 

— Descripción de gestores: de entra- 
das/salidas, de archivos, de sistemas de 
memoria virtual, de multiprogramación. 


2. Lenguajes 


— Lenguajes admisibles por la máquina. 
— Versión de los lenguajes ofertados. 
— Especificaciones a las que responde. 


Preg” 
GALAS" 


MHI19-AXMAT 


[a La elección del lenguaje apropiado facili- 
tará la resolución de los problemas. 


3. Rutinas de utilidad y lenguajes 
de aplicación 


— Tipo de rutinas de utilidad y funcio- 
nes que cumple. 

— Tipos de aplicaciones que se ofer- 
tan con el sistema. 

— Cantidad de memoria necesaria. 


' Otros aspectos a considerar 


1. Fecha de aparición en el mercado 


Indica la antigúedad del equipo, y 
como consecuencia, la vida que poten- 


cialmente le resta. Conviene fijarse que 
la antigúedad del sistema no sea supe- 
rior a cuatro años. El usuario que adquie- 
ra un ordenador debe contar con que le 
deberá ser útil durante unos diez años, 
para lo cual deberá considerar deteni- 
damente el tiempo de permanencia en 
el mercado. 


2. Asistencia técnica de sistemas 


Aunque el compromiso en los minis y 
micros no es tanto como el que se pue- 
de alcanzar en los grandes sistemas, su 
necesidad es importante igualmente. Los 
constructores están obligados a prestar 
un soporte de sistemas para implantar el 
software estándar. El usuario no debe 
abonar nada por el servicio, el cual no 
debe ser deducido del total de ayuda 
técnica que el constructor se comprome- 
ta a facilitar gratuitamente. 


y Compromiso de mantenimiento: no todos 
los constructores lo asumen por igual. 


3. Documentación 


El usuario debe contar siempre con una 
completa biblioteca de documentación 
referente al ordenador y al sistema ope- 
rativo que utilice. Antes de firmar ningún 
contrato, el usuario debe conocer el cos- 
te de la documentación necesaria para 
la completa utilización de los recursos de 
su sistema. 


Descripción 
de las 
instrucciones 


NA vez vista la estruc- 
tura general de la 
CPU y sus modos de 
direccionamiento en- 
tremos ahora en el 
estudio detallado de 
las instrucciones dis- 
ponibles por el Z-80. 


En el capítulo trataremos las instruccio- 
nes que versan sobre los movimientos de 
datos en memoria y registros. Es uno de 
los tipos de instrucciones más utilizados 
por los ordenadores, siendo el Z-80 uno 
de los microprocesadores más versátiles 
en el manejo de este tipo de instruccio- 
nes. 


[m Movimientos de 8 y 16 bits 


Estas instrucciones permiten copiar un 
dato de 8 ó 16 bits desde una posición 
de memoria, o de un registro, a otra po- 
sición de memoria, u otro registro. 

Esta instrucción puede utilizarse con los 
diferentes tipos de direccionamiento ex- 
plicados en el apartado anterior. 

El formato de este tipo de instrucciones 
es el siguiente: 
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LD | 1." OPERANDO 2. OPERANDO 


Fig. 1. 


LD (de LoaD en Inglés) significa cargar 
un dato. 

El primer operando indica el destino 
donde se ha de cargar el dato que indli- 
ca el segundo operando. Por tanto, el pri- 
mer operando puede ser un registro o 
una dirección de memoria, ambos de 8 
o de 16 bits, y el segundo puede ser un 
número binario, el contenido de un regis- 
tro o el contenido de una dirección de 
memoria (de 8 o de 16 bits). Como pue- 
de verse en la tabla adjunta, debe tener- 
se bien claro que cuando se utiliza un 
dato de 16 bits, éste ocupa dos posicio- 
nes de memoria (bytes), y al dar una sola 
dirección, nos referimos a esa posición 
de memoria y a la siguiente (el Z-80 lo en- 
tiende así). En el caso de registros de 16 
bits, nos referimos a la agrupación de dos 
registros de 8 bits, de la forma estándar, 
es decir, AF, BC, DE y HL, o de algún regis- 
tro de 16 bits, como el puntero del stock 
(SP). 

En el caso del Z-80 (al contrario de 
otros microprocesadores como el 6502), 
son prácticamente posibles todas las 
combinaciones. En la tabla adjunta pue- 
den verse todas ellas: 
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Instrucciones de movimiento de bloques 


Códigos 
76 543 210 Hex 


H+(SP+1) 
L+*(SP) 
IXu*(SP +1) 
IX, (SP) 
IYu*=(SP+1) 
1Y, (SP) 


(DE)=(HL) 


Repetir hasta que 
BC=0 


(DE)=—(HL) 
DE+-—DE-—1 
HL=-—HL-1 
BC+-BC-1 


(DE)=(HL) 


Repetir hasta que 
BC=0 


A-—(HL) 
HL+-HL+1 
BC+-BC-1 


A-—(HL) 
HL-HL+1 
BC+=-BC-1 


Repetir hasta que 
A=(HL) o BC=0 


Repetir hasta que 
A=(HL) o BC=0 


NOTAS: O P/V a 0 si el resultado de BC-1 es 0: P/V a 
tado el recorrido; P/V a 1 en caso contrario. O Za 1 


lA Fig. 2. 


En este tipo de tablas, la primera co- 
lumna indica la forma de escribir la ins- 
trucción en lenguaje ensamblador. En la 
segunda se explica simbólicamente su 
forma de operar. La tercera indica los 
cambios que se producirán en el registro 
de flags al ejecutar la instrucción. La si- 
guiente indica la traducción a hexadecl- 
mal de las mismas. Y las demás indican 
otros parámetros de interés. 

Como es de suponer, los paréntesis in- 
dican direccionamiento indirecto, y 
cuando a un dato se le suma IX o 1Y, in- 


11 101 011 EB 
00 001 000 08 
11 011 001 D9 Intercambio del 
grupo de regis- 
tros con el gru- 
po alternativo 

11 100 011 E3 


11 011 101 DD 
100 011 E3 
111 101 FD 
100 011 E3 


101 101 ED 
10 100 000 AO 


Carga (HL) en 
(DE), incremen- 
ta HL y DE y 
disminuye el 


11 101 101 ED 
10 110 000 BO 


11 101 101 ED 
10 101 000 A8 


11 101 101 ED 
10 111 000 B8 


11 101 101 ED 
10 100 001 Al 
11 101 101 ED 


10 110 001 B1 


11 101 101 ED 
10 101 001 A9 
11 101 101 ED 


10 111 001 B9 


1 en caso contrario. O P/V a 0 si se ha comple- 
si A = (HL); Z a O en caso contrario. 


dica indexación, como ya se explicó an- 
teriormente. 
Veamos esto con unos ejemplos: 


1. LD(BC),A 


Carga en la posición de memoria cuya 
dirección está en la dirección BC (2 
Bytes = 16 bits = 1 dirección), el conteni- 
do del acumulador. 


2. LD (IY+d)n 


Carga en la dirección de memoria que 
se encuentra en otra posición resultante 


de la suma del contenido del registro ín- 
dice IY, con una dirección numérica (re- 
presentada por ad), el valor n, por ejem- 
plo: 


LD (IY+$3FAB),3C 


Carga en la dirección (IY+$3FAB) el nú- 
mero de 8 bits 3C. Es decir, en el byte 
IY+$3FAB y en el siguiente se encuentra 
la dirección donde cargar el dato. 


3. Ahora con 16 bits: 
LD (nn),(dd) como LD($3A18),($n31F) 


La instrucción carga en la posición de 
memoria cuya dirección se encuentra en 
las direcciones nn y nn+1, el dato cuya 
dirección se encuentra en la direc- 
ción dd. 


O Intercambios entre registros 


El Z-80 dispone de algunas instruccio- 
nes que permiten intercambiar los conte- 


nidos de algunos registros. Intercambiar 
no es lo mismo que cargar, ya que al car- 
gar los dos registros implicados acaban 
con el mismo dato, mientras que en los 
intercambios sólo se les cambia de sitio. 


Las instrucciones son las siguientes: 


— EX DE,HL: Intercambia el contenido 
de los registros DE y HL. 


— EX AF,AF": Cambia el registro AF con 
el equivalente del juego de registros 
complementarios. 


— EXX: Esta instrucción cambia el res- 
to de los registros con los del juego com- 
plementario. 


Existen, además, otras instrucciones 
para intercambiar con el contenido de la 
pila del sistema, o stack, pero éstas se 
verán más adelante. 


Instrucciones de movimiento de 8 bits 


Código Indicadores Códigos 
mnemotécnico| Operación simbólica SZ H  P/VNC]|76 543 210 Hex| bytes | ciclos M| estados T| Comentarios 


LD r,r er 
LD r,n ron 


LD r,(HL) r-(HL) 
LD r,(IX+d) | r—(IX+d) 
LD r,(1Y+d) | r-(1Y+d) 


LD (HL),r (HL)—r 
LD (IX+d),r | (IX+d)-r 


LD (IY+d),r | (1Y +d)-—r 


LD (HL),n (HL)—n 


LD (IX+d),n | (IX+d)=—n 


LD (IY+d),n | (IY+d)—n 


LD A,(BC) 
LD A,(DE) 
LD A,(nn) 


LD (BC),A 
LD (DE),A 
LD (nn),A 


LD A,! 


11X0XIFF O 


...o.xoxX oo 


SOEERTO 


+ | 11 011 101 DD 

00 110 110 36 
de 
no 

e | 11 111 101 FD 

00 110 110 36 
de 
n= 

+ |00 001 010 0A 

* [100 011 010 1A 

+ |00 111 010 3A 


NOTAS: r,r' representan cualquiera de los regstros A, B, C, D, E, H, L. IFF significa que el contenido (IFF) 
de la báscula de habilitación de interrupciones se carga en P/V. Para los diferentes simbolos que 
Fig. 3. se emplean véase la tabla que figura al final del apéndice. 
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Instrucciones de movimiento de 416 bits 


LD dd,nn 


al 11) 
+(nn) 


ddy—(nn+1) 
ddi —(nn) 


LD 1X,(nn) Xu (nn+1) 


1X1 (nn) 


LD IY,(nn) IYw+(nn+1) 


1Y, (nn) 


LD (nm),HL | (nn+1)-H 


(nn)-L 


LD (nn), (dd) | (nn+1)—ddu 


(nn) dd, 


LD (nm), IX (nn+1)-IX4 


(nn) -IX1 


LD (nn), Y (nn+1)IYu 


(nn) TY 


LD SP,HL 
LD SP,IX 


SP+-HL 
SP+-IX 


LD SP,IY SP+-1Y 


Wo N.* de 
Operación simbólica sz 7 PV NC 543 210 Hex estados T| Comentarios 


.«. XX + + e|00 ddo 001 dd Par 


po 
11 011 101 DD 
00 100 001 21 


-n> 
11 111 101 FD 
00 100 001 21 


-n 
00 101 010 2A 


-n> 
11 101 101 ED 
01 ddi 011 


11 011 101 DD 
00 101 010 2A 


11 111 101 FD 
00 101 010 2A 


—n 
00 100 010 22 


n= 
11 101 101 ED 
01 dd0 011 


n= 
11 011 101 DD 
“ |00 100 010 22 


11 111 101 FD 
00 100 010 22 


11 111 001 F9 
11 011 101 DD 
11 111 001 F9 
11 111 101 FD 
11 111 001 F9 


—n> 


en 


—n> 


-p> 


n= 
-n> 


-n> 


n= 


n= 


-pn> 


-p> 


po 


—-p> 


-p-> 


—p> 


NOTAS: dd es cualquiera de los pares de registros BC, DE, HL, SP. qq es cualquiera de los pares de 
duda AF, BC, DE, HL. (par), y (par), se refleren al byte alto y al byte bajo del par; por ejemplo, 


BC, =C, AF, =A. 


qm Transferencia de bloques 


Este conjunto de instrucciones permite 
mover bloques de memoria. Su utilidad 
es muy grande para implementar instruc- 
ciones tales como el tratamiento de tiras 
de caracteres (STRINGS). 


— LDI: Mueve el contenido de la posi- 
ción indicada por DE a la dirección indi- 
cada por HL. Después incrementa en uno 
los contenidos de DE y HL, con lo que pre- 
para para la ejecución de la siguiente 
instrucción. Además, decrementa BC en 
una unidad. 


— LDD: Es idéntica a la anterior, pero 
con la diferencia de que decrementa en 
una unidad los contenidos de DE y HL. 


— LDIR: Esta instrucción ejecuta repeltl- 
damente la instrucción LDI hasta que el 
contenido de BC se hace 0. De esta for- 
ma puede moverse una gran cantidad 
de datos con una sola instrucción. 


— LDDR: Esta es como la anterior, sólo 
que aquí la ejecución repetida es de la 


instrucción LDD, también hasta que BC 
llega a 0. 


qm Búsqueda de bloques 


Este conjunto de instrucciones permite 
buscar un determinado carácter dentro 
de un bloque. El carácter a buscar debe 
estar previamente en el acumulador (A). 


— CPlI: Compara el contenido del acu- 
mulador con el contenido de la direc- 
ción indicada por HL. Después incremen- 
ta HL en 1 y decrementa BC en uno. 


— CPD: Es idéntica a la CPI, con la par- 
ticularidad de que decrementa en una 
unidad HL. 


— CPIR: Ejecuta repetidamente una 
instrucción CPI hasta que el contenido 
de HL es idéntico al acumulador o BC lle- 
ga a cero. De esta forma puede buscar- 
se dentro de un bloque un determinado 
dato. 


— CPDR: Es igual que la anterior, pero 
con la ejecución repetida de la instruc- 
ción CPD. 


qu Programa: 


Organo 
electrónico 


L programa que apa- 
rece a continuación 
es un órgano electró- 
nico (computariza- 
do) para el SPEC- 
TRUM. Poco hay que 
decir sobre el progra- 
ma aparte de que 
está escrito en código máquina y de que 
nos puede permitir el interpretar, me- 
diante el teclado de nuestro ordenador, 
todas las melodías que nosotros quera- 
mos. 

Sólo hay que llamar la atención sobre 
algunas líneas. El programa utiliza tres 
caracteres definidos. Las líneas en las 
cuales se encuentran dichos caracteres 
son la 60 y la 90. En estas líneas todos los 
caracteres que aparecen después de 
las comillas de la sentencia PRINT hay 
que escribirlos en modo GRAPHICS. El 
modo GRAPHICS se consigue pulsando a 
la vez las teclas CAPS SHIFT y el nueve (9). 
Una vez hecho esto, el cursor se nos apa- 
recerá como una G parpadeante. Cuan- 
do tengamos el cursor en modo GRAP- 
HICS, sólo tenemos que pulsar la tecla 
que corresponda según el programa. 
Aunque el carácter que aparezca por 
pantalla nos resulte extraño, no tenemos 
que preocuparnos, ése es el carácter 
que tiene que salir. 

Una vez que el programa esté introdu- 
cido en la memoria y todas las líneas 
DATA estén correctamente escritas, tras 
hacer RUN, la pantalla del ordenador se 
oscurecerá. Cuando esto ocurra no tie- 
nes por qué preocuparte, el ordenador 
está cargando todo el código máquina 
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en su memoria. Una vez que esté carga- 
do todo el código máquina, nos apare- 
cerá el teclado de un piano en la panta- 
lla. Este es el momento de empezar a uti- 
lizar el programa. 


++ORGANO ELECTRONICO ++ 


ESPACICO-UDELVE A EASIC 


Las teclas que puedes utilizar para to- 
car música son las siguientes: 


A-DO 

W - DO sostenido 
S - RE 

E - Re sostenido 
D-M 

F - FA 

T - FA sostenido 
G - SOL 

Y - SOL sostenido 
H - LA 

U- LA sostenido 
J - SI 

K - DO (Una octava más arriba) 


Cuando te canses de tocar el órgano 
sólo tienes que pulsar la tecla SPACE 
para volver al BASIC. 


IAE EEES 

2 REM x(c)Ed. Siglo Cultural* 

3 REM *(c)1987 * 

4 REM AMOROSO SiS lSSOlE lala lOlojolalalajojok 

5 REM 

10 BORDER 1: PAPER 1: INK 7: C 
LEAR 39999 

20 GO SUB 9000: REM COLOCA LA 
SUBRUTINA EN CM 

30 GO SUB 8000: REM UDG 

40 REM DIBUJO DEL TECLADO 
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50 FOR I=8 TO 12 

60 PRINT AT 1,4;"C 88 88 BC 88 
88 88 BC B" 

70 NEXT 1 

80 FOR I=13 TO 15 

90 PRINT AT 1,4;"C BC BC BC BC 

BC BC BC B" 

100 NEXT I 

110 PLOT 32,111: DRAW 191,0 

120 PLOT 32,48: DRAW 191,0 

130 PRINT AT 0,4;"++0RGANO ELEC 
TRONICO++" 

140 PRINT AT 14,5;"A";AT 14,8;" 
S";AT 14,11;"D";AT 14,14;"F";AT 
14,17;"G";AT 14,20;"B";AT 14,23; 
"J";AT 14,26;"K" 

150 PRINT INVERSE 1;AT 11,6;"W 
AT IIGO CE SAD IES: "ESA 11 
,18;"Y"¡AT 11,213 8" 

160 PRINT AT 21,0;” ESPACIO- 
VUELVE A BASIC Si 

200 RANDOMIZE USR 40000 

210 PAUSE O 

220 STOP 
8000 UDGS 
8010 FOR I=0 TO 7 
8020 POKE I+USR "A",129 
8030 POKE I+USR "B",1 
8040 POKE I+USR “C”,128 
8050 NEXT I 
8060 RETURN 
9000 REM CARGA LAS LINEAS DATA 
9005 LET control=0 
9010 FOR I=40000 TO 40341 
9020 READ A: POKE I,A: LET CONTR 
OL=CONTROL+A 
9030 NEXT I 
9040 IF CONTROL<>25879 THEN PRI 


NT "ERROR EN LOS DATAS:REVISE LA 
S LINEAS DESDE LA 9200 HASTA L 
A 9540": STOP 

9050 RETURN 

9200 DATA 243,62,13,50, 24, 157,62 
,127,219,254 

9210 DATA 31, 48, 42,205, 158, 156,5 
8,24,157,254 

9220 DATA 13, 40,16, 185, 40, 24, 205 
,121,156, 121 

9230 DATA 254,13,32,10,50,24,157 
,24,223,121 

9240 DATA 254,13, 40,218,50,24,15 
7,205,121, 156 

9250 DATA 205,216, 156,24,207, 251 
,201,58,24,157 

9260 DATA 87,130,130,95,22, 0,33, 
25,157,25 

9270 DATA 126,35, 94,35,86,38,89, 
111,126, 238 

9280 DATA 15,119, 26,167,200, 133, 
111,126,238,15 

9290 DATA 119,19, 24, 244, 14, 0,62, 
253,219,254 

9300 DATA 6,5,205, 210, 156, 208, 62 
,191,219, 254 

9310 DATA 31,31,6,3,205,210,156, 
208,62,251 

9320 DATA 219,254,31,6,2,205,210 
,156,208,31 


9330 DATA 31,208, 12,62,223,219,2 
54,31,31,31 
9340 DATA 6,2,205, 210, 156,201,31 
,208, 12,16 
9350 DATA 251,201,58,24,157,33,2 
41,156,6,0 
9360 DATA 79,9,9,9,94,35,86,35,1 
10, 38 
9370 DATA 0,235,205, 181,3,243,20 
1,106,6,5 
9380 DATA 179,5,5,17,5,5,198,4,6 
,61 
9390 DATA 4,7,37,3,10,87,3,9,196 
,3 
9400 DATA 8,12,6,5,96,5,6,128, 4, 
7 
9410 DATA 140,3,9,255,3,8,0,4,64 
,157 
9420 DATA 8,93,157,11,107,157,13 
,64,157,17 
9430 DATA 93,157,25,126,157,23,1 
07,157,20,93 
9440 DATA 157.6.83.157.9.83.157. 
15,83,157 
9450 DATA 21,83,157,18,83,157,1, 
31,1,31 
9460 DATA 1,31,1,31,1,31,1,1,30, 
1 
9470 DATA 1,30,1,1,0,1,31,1,31,1 
9480 DATA 31,1,31,1,0,32,32,32,3 
2,31 
9490 DATA 1,1,30,1,1,30,1,1,0,1 
9500 DATA 31,1,31,1,31,1,31,1,30 
,»1 

9510 DATA 1,30,1,1,30,1,1,0,1,1 

9520 DATA 30,1,1,30,1,1,30,1,1,3 


10) 
9530 DATA 1,1,30,1,1,30,1,1,30,1 
9540 DATA 1,0 


'O Notas sobre el programa 
Organo electrónico 


El programa está hecho de tal forma 
que cualquier persona con conocimien- 
tos de código máquina puede utilizar las 
rutinas que se encuentran dentro del mis- 
mo para sus propios programas. 


' Programa: Agenda telefónica 


El siguiente programa es una agenda 
telefónica que nos permitirá tener alma- 
cenados en el disco de nuestro IBM o 
compatible toda la información que de- 
seemos sobre ciertas personas. 


| 


¿QUE ELIGES? 


[a Menú del programa Gestor de teléfonos. 


El programa nos permitirá tener un listín 
telefónico electrónico. Los datos que 
este programa puede almacenar son los 
siguientes: 

Nombre de la persona. 
Apellidos de la persona. 
Dirección en la cual vive. 
Ciudad. 

Código postal 

País. 

Teléfono. 


Este programa nos permite realizar las 
siguientes funciones con las fichas que 
vayamos introduciendo en memoria: 


— Introducir una persona nueva en el fi- 
chero. 


gapE QUIERES ,PANTALLA O IMPRESORA CP/ 1> 


¿QUE OPCION QUIERES? 


Buscar una persona. 


— Cambiar los datos de una persona. 
— Buscar todas las personas cuyo nom- 
bre empiece por una cierta letra. 

— Borrar una persona del fichero. 
— Listar todas las personas que hay al- 
macenadas. 


El programa también está capacitado 
para sacar por la impresora los datos de 
todo el listín telefónico que nosotros ha- 
yamos creado. Podemos sacar dicha im- 
presión con caracteres normales o con 
letras comprimidas. Esta última opción 
está especialmente pensada para aque- 
llos que quieran llevar una lista de todas 
las personas conocidas en la cartera. 


LOPEZ BORREGO 


CECILIA 
3334455 


FELIPE PUENTES MIL 


3996012 


LUIS MIGUEL ROSALES POZAS 


3450012 


MARIA MERCEDES ROSAS PI 


2339967 


PEDRO GARCIA MATA 
3224354 


[A Ejemplo de impresión. 


ep 


¿QUIERES CAMBIAR ESTA FICHA (S/N)? 


El programa nos permite modificar las fl- 
chas. 
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Este programa está escrito para cual-  cionar en el MSX y MSX2 con disco si se 
quier ordenador que sea compatible realizan los siguientes cambios: 
con el IMB pc, xt y at. También puede fun- 


100 
110 
120 
130 
140 
150 
1680 
170 
180 
190 
200 
210 
220 
230 
240 
250 
260 
270 
280 
290 
300 
310 
320 
330 
340 
350 
360 
370 
380 
390 
400 
410 
420 
430 
440 
450 
460 
470 
480 
490 
500 
510 
520 
530 
540 
550 
560 
570 
580 
590 
800 
610 
6820 
630 
640 
650 
860 
670 
680 
690 


700 REM 


REM AdaSSSSS OOOO lalalala jajajajaa lala jajajaaj lala lajololojok 
REM x* xk 
REM * AGENDA TELEFONICA x 
A A ii *k 
REM x* *k 
REM * POR: PETER BERGMANN k 
REM x* k 
REM AdSSSSSOS lalala lalalala lalola lalala lalalala lo jalolololok 
REM x*x xk 
REM x VARIABLES *k 
REM *k ooo xk 
REM * xk 
REM * REGISTRO TEMPORAL * 
REM *  S$ NOMBRE Ws, ES x 
REM Xx AS DIRECION Y$ * 
REM *  C$ CIUDAD US$ * 
REM*  Z$ ZONA 15 *k 
REMx*  P$ PAIS D$ + 
REM *  N$ TELEFONO 0$ * 
REM *  L$ PUNTERO IZQUIERDA L, F, LSx 
REM * R$ PUNTERO DERECHO R k 
REM *  B$ PUNTERO ARRIBA B k 
REM * xk 
REM * OTRAS k 
REM * M OPCION DE MENU * 
REM *  X$ FLAG PARA IZQ, DERC. * 
REM * TN NUMERO DEL PROXIMO REGISTROXx 
REM * TA NUMERO DE REGISTROS *k 
REM * U$,V$ PARA MANIPULAR STRING * 
REM * Z,Q NUMERO DE REGISTRO xk 
REM *  M$ RESPUESTA (S/N) * 
REM *  I CONTADOR k 
REM * J$,C RESPUESTA PARA CONTINUAR  * 
REM*  D FLAG k 
REM *  H$ LETRA A BUSCAR *k 
REM *  J$ PARA MANIPULACION DE STRING* 
REM *  P NUMERO DE PAGINA *k 
REM *  G$ FLAG (P/I) xk 
REM * U OPCION DE PRINT * 
REM * N CONTADOR DE REGISTROS xk 
REM *x k 
REM AdaSlSSSSO lalala lalala lalalala lalalala la lalalololalajalalololojok 
REM 
ES 
REM * (c) Ed. Siglo Cultural * 
REM * (c) 1987 xk 
REM dalla lalalala lalala lalalala lalalolololololalok 
REM 
KEY OFF 
CLS 
PRINT SISI lalalala lala lalalalala lalalala lalalala lalalala ja jolalolajolok" 
FOR 1 = 1 TO 19 

PRINT "x*"; TAB(40); "*" 
NEXT 1 


PRINT aMSISAS IAEA lll lolo llo" 
LOCATE 8,12: PRINT "AGENDA TELEFONICA" 

POCATE USILS PRENT jj 

LOCATE 12,7: PRINT "(c) Ed. Siglo Cultural, 1987" 
FOR 1 = 1 TO 1000 

NEXT I 


710 
720 
730 
740 
750 
760 
, 2 
770 
780 
790 
800 
810 
820 
830 
840 
850 
860 
870 
880 
890 
900 
910 
920 
930 
940 
950 
960 
970 
980 
990 


REM ARSS SOS dola lalalala lola jalo jajajajaa jaJOjojok 


REM x*x DEFINICION DE REGISTRO k 
REM aaa jj jok 
REM 


OPEN “TELE.F" AS +1 LEN = 148 
FIELD tt1, 40 AS S$, 15 AS N$, 30 AS A$, 20 AS C$, 5 AS Z$, 30 AS P$, 2 AS L$ 
AS R$, 2 AS B$ 


REMX 

REM *x*x VER SI HAY REGISTROS Xxx 

REM 

CLS 

GET $1, 1 

IF NOT EOF(1) THEN GOTO 900 

LSET S$ = "M" 

LSET N$ = MKI$(1) 

LSET A$ = MKIS$(1) 

LSET L$ = MKI$(0) 

LSET R$ = MKI$(0) 

LSET B$ = MKI$(0) 

PUT $1, 1 

REM 

AN E EEES 
REM * MENU * 
AN EEES 
REM 

CLS 


LOCATE 3,18: PRINT "MENU" 

LOCATE 4,17: PRINT "------ : 

LOCATE 6,12: PRINT "1 - NUEVA PERSONA" 

LOCATE 7,12: PRINT "2 - BUSCAR/CAMBIAR PERSONA" 


1000 LOCATE 8,12: PRINT "3 - BUSCAR" 

1010 LOCATE 9,12: PRINT "4 - BORRAR PERSONA" 
1020 LOCATE 10,12: PRINT "5 - LISTAR TODAS” 
1030 LOCATE 11,12: PRINT "6 - TERMINAR" 

1040 LOCATE 14,1: PRINT "(QUE ELIGES? (1-86)"; 
1050 INPUT M 

1060 IF (M < 1) OR (M > 6) GOTO 940 

1070 ON M GOSUB 1170, 2340, 3060, 3320, 2760, 1090 
1080 GOTO 950 

1090 REM 

1100 REM *** FIN DEL PROGRAMA —xxkxk 

1110 REM 

1120 CLOSE +1 

1130 CLS 

1140 PRINT "ADIOS..." 

1150 KEY ON 

1160 END 

1170 REM AdaslalSSS ISSO SS lSlS SOS SlSlSJS SEIS SESION TElElololojajok: 
1180 REM x*x INTRODUCIR PERSONA k 
1190 REM AadaldldlOoS ISSO SS lSlS ISSO lll jajok: 
1200 REM 

1210 CLS 

1220 PRINT "PARA SALIR INTRODUZCA *X” EN EL NOMBRE” 
1230 PRINT 

1240 LINE INPUT "NOMBRE: ";WS$ 

1250 IF W$ = "X" THEN RETURN 

1260 IF W$ = "" THEN GOTO 1210 

1270 LINE INPUT "APELLIDOS: ";E$ 

1280 GOSUB 1520 

1290 GOSUB 2230 

1300 IF X$ = "D" GOTO 1450 

1310 LINE INPUT "DIRECCION: ";Y$ 

1320 LINE INPUT "CIUDAD: ";U$ 

1330 LINE INPUT "CODIGO POSTAL: ";I$ 

1340 LINE INPUT "PAIS: ";D$ 

1350 LINE INPUT "NUMERO DE TELEFONO: ";0O$ 

1360 GOSUB 2010 

1370 GOSUB 2090 

1380 GOSUB 1640 


PROGRAMAS 


1390 
1400 
1410 
1420 
1430 
1440 
1450 
1460 
1470 
1480 
1490 
1500 
1510 
1520 
1530 
1540 
1550 
1560 
1570 
1580 
1590 
1600 
1610 
1620 
1630 
1640 
1650 
1660 
1670 
1680 
1690 
1700 
1710 
1720 
1730 
1740 
1750 
1760 
1770 
1780 
1790 
1800 
1810 
1820 
1830 
1840 
1850 
1860 
1870 
1880 
1890 
1900 
1910 
1920 
1930 
1940 
1950 
1960 
1970 
1980 
1990 
2000 
2010 
2020 
2030 
2040 
2050 
2060 
2070 


TN = TN 
TA = TA 
LSET N$ 
LSET A$ 
PUT +1, 
GOTO 117 
CLS 
PRINT "ESA FICHA YA EXISTE" 
PRINT:PRINT "PULSA UNA TECLA" 
H$=INPUT$(1) 

GOTO 1170 

END 


1 
1 
MKIS(TN) 
MKI$(TA) 


OP» 41Nnm>+ + 


E 


SPACE$(25) 
SPACE$(15) 
LEFTS(W$ + U$, 25) 
LEFTS$(E$ + V$, 15) 
LEFT$(W$ + E$, 40) 
RN 


[2] a 
23353 


8 
E .n...pLo2u 4 


REMx 

REM* DISECT KEY 

REMx 

W$ = LEFTS$(S$.25) 

E$ = RIGHT$(S$, 15) 

RETURN 

REM 

REM* GET ROOT 

REM 

GET $1,1 

LETQ = 1 

TN = CVI(N$) 

TA = CVI(A$) 

RETURN 

REMx 

REM *x* FICHA REPETIDA *x*xx* 

REM 

LET X$ = "D" 

REM 

RETURN 

REM 

REM *x** COGER DERECHA *xkxk 

REM 

R = CVI(R$) 

IF R = O THEN LET X$="R": GOTO 1850 
GET $1, R 

LETQ=R 

RETURN 

REM 

REM x**x* COGER IZQUIERDA xxx 

REM 

L = CVI(L$) 

IF L = O THEN LET X$ = "L": GOTO 1930 
GET $1, L 

LETQ =L 

RETURN 

REM 

REM *x*x* COGER x*xxk 
REM 

B = CVI(B$) 

GET $1, B 

LETQ=B 

RETURN 

REM 

REM *x**x CAMBIAR xoxk 
REM 

TN = TN + 1 

IF X$ = "L" THEN LSET L$ 
IF X$ = "R" THEN LSET R$ 
PUT +1, Q 


MKI$S(TN) 
MKI$(TN) 
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2750 REM aaa lalalala lla lalala lol lVldlolVlojoK 


2760 REM x* IMPRIMIR ARBOL a *k 
A 
2780 REM 


2790 GOSUB 4260 

2800 LET P = 1 

2810 CLS - 
2820 LOCATE 1,14: PRINT "LISTA DE NOMBRES" 
2830 GOSUB 1640 

2840 LET I = 1 

2850 LET X$ = "N" 

2860 WHILE X$ = "N" 

2870  GOSUB 1870 


2880 WEND 

2890 L = CVI(L$) 
2900 R = CVI(R$) 
2910 B = CVI(B$) 


2920 IF (Q <> 1) AND (M <> 3) THEN GOSUB 4500 
2930 IF (M = 3) AND (Q <> 1) THEN GOSUB 3250 
2940 IF I = TA THEN GOTO 3040 

2950 I= I +1 

2960 LET X$ = "N" 

2970 GOSUB 1790 

2980 IF X$ = "N" GOTO 2860 

2990 LET Z=Q 

3000 GOSUB 1940 

3010 R = CVI(R$) 

3020 IF R = Z THEN GOTO 2990 

3030 GOTO 2920 

3040 PRINT: PRINT: PRINT "PULSA ENTER PARA CONTINUAR"; : INPUT C 
3050 RETURN 

3060 REM 

3070 REM daaalaS lalalala lalololololo lok 
3080 REM * BUSCAR * 
3090 REM aaa ISSO lll Ill III: 
3100 REM $ 

3110 CLS 

3120 LOCATE 2,12: PRINT "BUSQUEDA POR UNA LETRA" 
3130 LOCATE 4,1: PRINT "PRIMERA LETRA DEL NOMBRE"; 
3140 INPUT H$ 

3150 CLS 

3160 LOCATE 2,16: PRINT "NOMBRES CON ";H$ 
3170 PRINT 

3180 GOSUB 2830 

3190 PRINT : PRINT 

3200 PRINT "(QUIERES VER MAS (S/N):"; 

3210 INPUT M$ 

3220 IF M$ = "S" THEN GOTO 3100 

3230 IF M$ <> "N" THEN GOTO 3200 

3240 RETURN 

3250 REM 

3260 REM *x** CHEQUEA LA PRIMERA LETRA x*xx 
3270 REM 

3280 J$ = LEFT$(S$, 1) 

3290 IF J$ = H$ THEN GOSUB 1580: PRINT W$;E$ 
3300 IF J$ > H$ THEN I = TA 

3310 RETURN 

3320 REM 

3330 REM aeRaSIRalaMIS lalalala lalalala lalalalalafalalalalojololololok 
3340 REM * BORRAR REGISTRO *. 
3350 REM dodo ISS lll llo: 
3360 REM 

3370 CLS 

3380 LOCATE 3,11: PRINT "BORRAR UNA PERSONA” 
3390 GOSUB 2410 

3400 IF X$ = "D" THEN GOTO 3460 

3410 LOCATE 12,1: PRINT "(QUIERES BORRAR MAS (S/N)"; 
3420 INPUT M$ 


3430 IF M$ = "S" GOTO 3370 

3440 IF M$ <> "N" GOTO 3410 

3450 RETURN 

3460 LOCATE 14,2: PRINT "(ESTAS SEGURO (S/N)"; 
3470 INPUT M$ 

3480 IF M$ = "N" THEN CLS: GOTO 3410 

3490 IF M$ <> "S" THEN GOTO 3460 


3500 R = CVI(R$) 
3510 L = CVI(L$) 
3520 B = CVI(B$) 


3530 LET D=0 

3540 IF (L <> 0) OR (R <> O) THEN GOTO 3610 

3550 GET +1, B 

3560 F.= CVI(L$) 

3570 IF F = Q THEN LSET L$ = MKI$(0) ELSE LSET R$ = MKI$(0) 
3580 PUT +1, B 

3590 GOTO 3910 

3600 REM 

3610 IF R = O THEN GOTO 3710 

3620 LET D = 1 

3630 GET +41, B 

3640 F = CVI(L$) 

3650 IF F = Q THEN LSET L$ = MKI$(R) ELSE LSET R$ = MKI$(R) 
3660 PUT +1, 
3670 GET +1, 
3680 LSET B$ 
3690 PUT +1, 
3700 REM 
3710 IF L = O THEN GOTO 3910 
3720 IF D = 1 THEN GOTO 3820 


3730 GET $1, B 

3740 F = CVI(L$) 

3750 IF F = Q THEN LSET L$ = MKI$(L) ELSE LSET R$ = MKI$(L) 
3760 PUT +1, 
3770 GET +1, 
3780 LSET B$ 
3790 PUT +1, 
3800 GOTO 391 
3810 REM 
3820 GET +*1, L 
3830 LET W$ = S 
3840 LET LS = L 
3850 GOSUB 2230 
3860 IF X$ = "L" THEN LSET L$ = MKI$(LS) ELSE LSET R$ = MKI$(LS) 
3870 PUT $1, Q 

3880 GET $1, LS 

3890 LSET B$ = MKI$(Q) 

3900 PUT +1, LS 

3910 CLS 

3920 LOCATE 4,12: PRINT "FICHA BORRADA! " 

3930 GOSUB 1640 

3940 TA = TA - 1 

3950 LSET A$ = MKI$(TA) 

3960 PUT $1, 1 

3970 GOTO 3410 

3980 REM 

3990 REM aaalaldalO lalala lalalala lalalala lalala lala lalalalolalalajojajololojolak 

4000 REM * CAMBIAR EL REGISTRO k 

4010 REM adalaaldSlO aaa lalalala lalala jala lalola lolalala lalalala lolojololak 

4020 REM 

4030 LOCATE 14,2: PRINT SPACE$(38) 

4040 LOCATE 14,2: PRINT "(QUE QUIERES CAMBIAR (D,C,Z,P,T)"; 

4050 INPUT M$ 


MKIS$(B) 


DnMQoNw 


MKIS$(B) 


oriro 


4060 IF M$ = "D" THEN LOCATE 4,9: LINE INPUT Y$: LSET A$ = Y$ 
4070 IF M$ = "C” THEN LOCATE 5,9: LINE INPUT U$: LSET C$ = U$ 
4080 IF M$ = "Z" THEN LOCATE 6,9: LINE INPUT 1$: LSET Z$ = 1$ 
4090 IF M$ = "P" THEN LOCATE 7,9: LINE INPUT D$: LSET P$ = D$ 
4100 IF M$ = "T" THEN LOCATE 8,9: LINE INPUT O$: LSET N$ = 0$ 
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4110 PUT *$1, Q 

4120 CLS 

4130 RETURN 

4140 REM 

4150 REM oooO lalalala lalalala lolololojojoK 

4160 REM x*x IMPRIMIR k 

4170 REM asada lola lalojalolojak 

4180 REM 

4190 GOSUB 4890 

4200 LPRINT W$;E$ 

4210 LPRINT A$ 

4220 LPRINT C3$;" ";Z$ 

4230 LPRINT P$ 

4240 LPRINT N$ 

4250 RETURN 

4260 REM 

4270 REM olaaa ISSO Jak 

4280 REM * PANTALLA O IMPRESORA ???? * 

4290 REM aaoaIaSIOS lll lalola lll lalVIJOK 

4300 REM 

4310 CLS 

4320 LOCATE 2,1: PRINT "(QUE QUIERES, PANTALLA OR IMPRESORA (P/I)"; 
4330 INPUT G$ 

4340 IF (G$ <> "P") AND (G$ <> "I") THEN GOTO 4310 
4350 LOCATE 5,16: PRINT "OPCIONES" 

4380 LOCATE 6,15: PRINT "---------- ES 

4370 LOCATE 7,10: PRINT "i - NOMBRE” 

4380 LOCATE 8,10: PRINT "2 - NOMBRE Y TELE" 

4390 LOCATE 9,10: PRINT "3 - NOMBRE, DIREC. Y TELE" 
4400 LOCATE 12,1: PRINT "(QUE OPCION QUIERES";- 
4410 INPUT U 

4420 IF (U < 1) OR (U > 3) THEN GOTO 4400 

4430 LOCATE 14,1: PRINT "(ESTAS SEGURO (S/N)"; 
4440 INPUT M$ 

4450 IF M$ = "N"” THEN GOTO 4310 

4460 IF M$ <> "S" THEN GOTO 4430 

4470 LETN = 0 


4480 IF G$ "I" THEN GOSUB 4890 

4490 RETURN 

4500 REM 

4510 REM sal VISIO IIJKOK 
4520 REM * IMPRIMIR * 
4530 REM aa lS ISIAH VIVIJOKOK 
4540 REM 


4550 GOSUB 1580 

4560 IF G$ = "I" THEN GOTO 4710 

4570 PRINT W$;E$ 

4580 IF U = 3 THEN PRINT A$: PRINT C$,Z$: PRINT P$ 
4590 IF U > 1 THEN PRINT N$ 


4600 PRINT 

4610 N =N + 1 

4620 IF (U = 1) AND (N/P = 10) THEN GOTO 4660 
4630 IF (U = 2) AND (N/P = 7) THEN GOTO 4660 
4640 IF (U = 3) AND (N/P = 3) THEN GOTO 4660 


4650 GOTO 4880 

4660 P =P +1 

4670 PRINT: PRINT "PULSA ENTER "; 

4680 J$ = INPUT$(1) 

4690 CLS 

4700 GOTO 4880 

4710 REM 

4720 REM ddSlAMIS ASIS lalalala lalola lolo loJoK 
4730 REM * SALIDA POR IMPRESORA k 
4740 REM aoalaOIO ISSO laO lalalala lalo lalololalojalojojak 
4750 REM 

4760 LPRINT W$;E$ 

4770 IF U = 3 THEN LPRINT A$: LPRINT C$,Z$: LPRINT P$ 
4780 IF U > 1 THEN LPRINT N$ 


4790 LPRINT 
4800N =N + 1 


4840 GOTO 4880 

4850 P=P +1 

4860 LPRINT CHR$(12) 
4870 CLS 

4880 RETURN 

4890 REM 


4910 REM x* PREPARAR IMPRESORA 


4930 REM 
4940 LPRINT CHR$(27)+CHR$(64) 
4950 CLS 


4970 INPUT M$ 
4990 IF M$ = "G" THEN LPRINT CHR$(18) 
5010 CLS 


5030 J$ = INPUT$(1) 
5040 RETURN 


650 LOCATE 12,8:PRINT “AGENDA TELEFO- 
NICA” 

660 LOCATE 11,9:PRINT “ooaommmamaaaaamnnna dd 

670 LOCATE 7,12:PRINT “(c) Ed. Siglo Cul- 
tural, 1987” 

960 LOCATE 18,3:PRINT “MENU” 

970 LOCATE 17,4:PRINT “------ d 

980 LOCATE 12,6:PRINT “1 - NUEVA PERSO- 
NA” 

990 LOCATE 12,7:PRINT “2 - BUSCAR/CAM- 
BIAR PERSONA” 

1000 LOCATE 12,8:PRINT “3 - BUSCAR” 
1010 LOCATE 12,9:PRINT “4-BORRAR PER- 
SONA” 

1020 LOCATE 12,10:PRINT “5 - LISTAR TO- 
DAS” 

1030 LOCATE 12,11:PRINT “6 - TERMINAR” 
1040 LOCATE 1,14:PRINT “(QUE ELIGES? 
(1-6) ”; 

2400 LOCATE 14,3:PRINT “BUSCAR PERSO- 
NA” 

2410 LOCATE 1,5:PRINT “(NOMBRE”; 

2430 LOCATE 1,6:PRINT “(APELLIDOS ”; 


4810 IF (U = 1) AND (N/P = 30) THEN GOTO 4850 
4820 IF (U = 2) AND (N/P = 20) THEN GOTO 4850 
4830 IF (U = 3) AND (N/P = 10) THEN GOTO 4850 


4900 REM dsRaoSIAS ASSIM IVISIIJOJOK 


4920 REM osASS ASIS S ISI RllVIOJOR 


4960 LOCATE 2,1: PRINT "(QUIERES IMPRESION GRANDE O PEQUENIA (G/P)"; 
4980 IF M$ = "P" THEN LPRINT CHR$(27)+CHR$(15) 
5000 IF (M$ <> "P") AND (M$ <> "G") THEN GOTO 4950 


5020 LOCATE 2,1: PRINT "COLOCA EL PAPEL Y PULSA ENTER"; 


2510 LOCATE 2,3:PRINT “APELL. ”;ES 
2520 LOCATE 2,4:PRINT “DIREC. ”;AS$ 
2530 LOCATE 2,5:PRINT “CIUDAD ”;C$ 
2540 LOCATE 2,6:PRINT “CODIGO ”;Z$ 
2550 LOCATE 2,7:PRINT “PAIS ”;PS 
2560 LOCATE 2,8:PRINT “TELE ”;¡N$ 


2580 LOCATE 2,14:PRINT “(QUIERES CAM- 
BIAR ESTA FECHA? (S/N)”; 

2620 LOCATE 2,14:PRINT SPACE$(38) 

2630 LOCATE 2,14:PRINT “(QUIERES SACAR- 
LO POR IMPRESORA? (S/N) ”: 

2680 LOCATE 2,14:PRINT SPACES(38) 
2690 LOCATE 2,14:PRINT “(QUIERES BUS- 
CAR MAS? (S/N) ”; 

2820 LOCATE 14,1:PRINT “LISTA DE NOM- 
BRES” 


3120 LOCATE 12,2:PRINT “BUSQUEDA POR 
UNA LETRA” 


3130 LOCATE 1,4:PRINT “PRIMERA LETRA 
DEL NOMBRE”; 


e LOCATE 16,2:PRINT “NOMBRES CON 
”H 
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3380 LOCATE 11,3:PRINT “BORRAR UNA 
PERSONA” 

3410 LOCATE 1,12:PRINT “(QUIERES 
BORRAR MAS? (S/N) »; 

3460 LOCATE 2,14:PRINT “(ESTAS SEGURO? 
(S/N) ”; 

3920 LOCATE 12,4:PRINT “FICHA BORRA- 
DA!” 

4030 LOCATE 2,14:PRINT SPACES(39) 
4040 LOCATE 2,14:PRINT “(QUE QUIERES 
CAMBIAR (D,C,Z,P,T) ”; 

4060 IF M$="D”THEN LOCATE 9,4:LINE INPUT 
YS:LSET AS=YS$ 

4070 IF M$="C”THEN LOCATE 9,5:LINE IN- 
PUT US$:LSET C$=U$ 

4080 IF M$="Z”THEN LOCATE 9,6:LINE INPUT 
IS:LSET Z$=IS 

4090 IF M$="P”THEN LOCATE 9,7:LINE INPUT 
D$:LSET P$=D$ 

4100 IF MS="T”THEN LOCATE 9,8:LINE INPUT 
OS$:LSET N$=O$ 


4320 LOCATE 1.2:PRINT “(QUE QUIERES, 
PANTALLA O IMPRESORA (P/I) ”; 

4350 LOCATE 16,5:PRINT “OPCIONES” 
4360 LOCATE 15,5:PRINT “=======--- d 

4370 LOCATE 10,7:PRINT “1 - NOMBRE” 
ES LOCATE 10,8:PRINT “2 - NOMBRE Y 
4390 LOCATE 10,9:PRINT “(QUE OPCION 
QUIERES? ”; 

4400 LOCATE 1,12:PRINT “(QUE OPCION 
QUIERES? »; 

nl LOCATE 1,14:PRINT “(ESTAS SEGURO? 
4960 LOCATE 1,2:PRINT “(QUIERES IMPRE- 
SION GRANDE O PEQUEÑA (G/P)”; 

5020 LOCATE 1,2:PRINT “COLOCA EL PAPEL 
Y PULSA ENTER”; 


Este programa aparecerá dentro de 
pocos tomos en versiones para el COM- 
MODORE, AMSTRAD y SPECTRUM. 


DEMAS del control so- 
bre los datos (para 
obviar la introduc- 
ción de errores y ase- 
gurar la congruencia 
de los resultados), en 
el análisis de una 
aplicación informáti- 
ca o un programa conviene introducir al- 
gunos mecanismos de seguridad en el 
conjunto de los ficheros de datos a pro- 
cesar. 

En efecto, en todos los dispositivos físi- 
cos de soporte magnético de datos se 
pueden producir errores y accidentes 
que provocarán la destrucción de los da- 
tos o, al menos, dificultades en su lectura. 

La situación es ligeramente diferente 
en el caso de manejo de cintas magné- 
ticas y de discos fijos. Los disquetes mag- 
néticos participan de ciertas caracterís- 
ticas de ambos medios. 


En el caso de las cintas magnéticas es 
usual prever varios procedimientos de 
seguridad. 


a) Control de validez de los datos leí- 
dos: hay que establecer un procedimien- 
to de reintentos de lectura y de informa- 
ción al usuario en caso de producirse 
errores. Se pueden fijar otros controles 
(de longitud de datos obtenidos, de se- 
cuencia de registros, etc.) para asegurar 
la correcta lectura de los datos. 


b) Establecimiento de una copia de 
seguridad para un fichero, cuando la re- 
petición del proceso de obtención de 
ese archivo es larga o complicada, 
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SEGURIDADES EN LOS PROCESOS 


cuando los datos deben ser utilizados en 
varios procesos, etc. Hay que evaluar en 
este caso el coste de inmovilización de 
las copias frente a la posibilidad de re- 
petición de los procesos, los problemas 
de tiempo que pueden surgir, etc. 


c) A veces, incluso, se establece un 
sistema de varias copias (normalmente 
tres: «abuelo-padre-hijo») cuando es im- 
portante el fichero a conservar o cuando 
el proceso se repite con mucha frecuen- 
cia. 


d) Reducir los tiempos de realización 
en los procesos muy largos, previendo su 
fraccionamiento y estableciendo puntos 
de control y relanzamiento. Para ello hay 
que definir unos momentos en los que el 
proceso se detenga y en los que se ob- 
tenga una imagen de la situación (posi- 
ción de los ficheros que se están proce- 
sando, estado de las variables, imagen 
de la memoria principal, etc.). De este 
modo, si en el intervalo hasta el siguiente 
punto de control se produce una anoma- 
lía, es posible relanzar el proceso desde 
el punto de control anterior en vez de 
arrancar la aplicación desde su comien- 
zo. En estos puntos de relanzamiento se 
suelen establecer controles para detec- 
tar posibles anomalías no detectables 
por simple observación exterior del de- 
sarrollo del proceso y que no producen 
un mensaje de error del sistema. 


e) Además de la definición de los sis- 
temas de seguridad indicados, el analis- 
ta deberá proveer normas detalladas de 
actuación de todas las personas involu- 
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cradas en los trabajos, de forma que se 
actúe de un modo preciso para la detec- 
ción y eliminación o corrección de los 
errores que se puedan producir. 


En el caso de los discos magnéticos se 
pueden producir, además, algunos otros 
errores o accidentes debidos a la propia 
estructura del dispositivo: detección del 
disco en el momento de escritura con 
destrucción física del soporte, borrado 
de etiquetas o índices de los ficheros 
etcétera, incluso problemas de polvo, al 
que son bastante sensibles. 

Para evitar estas dificultades (o minimi- 
zarlas en la medida de lo posible) se re- 
comienda: 


a) Limitar la importancia de las 
correcciones a realizar si se produce una 
destrucción de información, mediante la 
división del fichero en bloques lógicos 
que representen porciones limitadas de 
los ficheros completos. 


b) Prever un código incluido en el fi- 
chero; código que deberá ser analizado 
antes de la cumplimentación de cual- 
quier orden de escritura. 


c) Limitar los accesos de modifica- 
ción de los ficheros básicos, mediante 
agrupación de las actualizaciones del 
archivo, en la medida de lo posible. 


d) Distribuir los ficheros en varios dis- 
positivos físicos o instalar en un dispositi- 
vo los índices de acceso y otros elemen- 
tos de control y en otro diferente los da- 
tos. Por este procedimiento, ademas, se 
puede mejorar el tiempo de acceso a los 
archivos básicos, dependiendo del siste- 
ma físico (hardware) sobre el que se esté 
trabajando. 


e) Control del momento en que se ha 
producido la anomalía (error, detención 
del dispositivo, etc.) respecto del mo- 
mento en que se ha escrito o se deberá 
escribir, para deducir de ello las fases a 
cumplimentar en el proceso de recons- 
trucción del fichero y en el procedimien- 
to de relanzamiento. 


f) Creación de ficheros de seguridad 
parciales que se elaboren automática- 
mente en ciertos momentos del proceso 
o cuando se ha producido un número de 
accesos predefinido. 


g) Establecimiento de ficheros de al- 
macenamiento de actualizaciones para 
simplificar el relanzamiento. 


h) Control de volumen de los ficheros 
para coadyuvar a los mecanismos de se- 
guridad del sistema y prever áreas de ex- 
pansión y reordenación de los archivos. 


1) Prever y definir cuidadosamente los 
procesos de depuración y reorganiza- 
ción de los ficheros para minimizar estas 
tareas y eliminar posibles fuentes de pro- 
blemas. 


Ademas de estos mecanismos concre- 
tos de seguridad indicados, en la mayo- 
ría de las aplicaciones será posible, e in- 
cluso conveniente, establecer otras se- 
guridades y controles que vendrán indl- 
cadas por las características de las ta- 
reas a desarrollar. 

Conviene hacer un examen de los pro- 
cesos desde este punto de vista y detec- 
tar las tareas especialmente críticas, ex- 
tremando en ellas el número y sofistica- 
ción de las seguridades a definir e inclu- 
so, en algunos casos, estableciendo que 
los programas emitan mensajes de ad- 
vertencia a los operadores. 


TIPOS DE DATOS 


OR el momento he- 
mos hablado bastan- 
te de estructuras de 
datos. En efecto, los 
escalares, las series o 
vectores y las tablas 
o matrices constitu- 
yen en conjunto la es- 
tructura de más del 99 por 100 de los da- 
tos que uno suele encontrarse en los pro- 
gramas de ordenador. Es verdad que 
existen otras estructuras: tablas rectan- 
gulares de tres o más dimensiones, listas, 
arboles y grafos que pueden tener gran 
utilidad en aplicaciones concretas, es- 
pecialmente en lenguajes especializa- 
dos (como LISP) o próximos al lenguaje 
de la máquina (como C). Describiremos 
más adelante estas otras estructuras. 

Además de una estructura determina- 
da, los datos que proporcionamos a un 
programa pueden pertenecer también a 
varios tipos diferentes. El tipo de un dato 
nos indica qué clase de información re- 
presenta ese dato y qué operaciones po- 
demos realizar con él. Por ejemplo, un 
dato de un programa podría ser la pala- 
bra «VERTEBRA». Otro dato del mismo pro- 
grama podría ser el número 25. En el pri- 
mer caso tenemos información alfabéti- 
ca con la que podemos realizar opera- 
ciones como las siguientes (entre otras 
muchas posibles): 


— Ponerla por orden alfabético, lo 
que nos daría el resultado «ABEERRTV». 


— Compararla con otra palabra, lo 
que nos daría el resultado «son iguales» 
o «son desiguales». 
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— Extraer los tres primeros caracteres, 
lo que nos daría el resultado «VER». 

— Extraer dos caracteres a partir del 
cuarto, lo que nos daría el resultado «TE». 

— Invertir el orden de sus letras, lo que 
nos dará el resultado «ARBETREV». 

— Imprimirla por la pantalla. 


En el caso del número 25 tenemos in- 
formación numérica, con la que pode- 
mos realizar operaciones como las si- 
guientes (también entre otras muchas): 


— Sumarle el número 3, lo que nos da- 
ría el resultado 28. 

— Multiplicarla por 2, lo que nos daría 
el resultado 50. 

— Pasarla al sistema de numeración 
binario, lo que nos daría el resultado 
«11001». 

— Compararla con otro número, lo 
que nos daría el resultado «son iguales», 
«son desiguales», «el primero es mayor» o 
«el segundo es mayor». 

— Imprimirla por la pantalla. 


Como se ve, algunas de las operacio- 
nes que podemos ralizar con la informa- 
ción alfabética (como ordenar por orden 
alfabético o extraer cierto número de ca- 
racteres a partir de uno dado) no son 
aplicables a la información numérica. 
Por el contrario, algunas de las operacio- 
nes que podemos realizar con datos nu- 
méricos (como la suma, la multiplicación 
o el cambio de sistema de numeración) 
no son aplicables a los datos alfabéticos. 
Por último, existen operaciones (como 
imprimir en la pantalla o comparar) que 
pueden realizarse indistintamente con 
ambos tipos de datos. 
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En las próximas páginas veremos con 
más detalle ambos tipos principales de 
datos, junto con sus posibles subdivisio- 
nes y las operaciones en que pueden to- 
mar parte. Después mencionaremos al- 
gunos tipos de datos más, que se estu- 
diarán con más detalle en otra parte de 
esta obra. 


Datos numéricos 


No cabe duda de que la información 
numérica desempeña un papel importan- 
tísimo en los programas de ordenador. 
Sin embargo, el mero hecho de poder 
operar con ella presenta cierto número 
de problemas, relativamente complejos, 
que vamos a describir sin entrar demasia- 
do en detalle. 

La información de cualquier tipo está 
contenida en la memoria de las compu- 
tadoras en forma binaria, mediante cir- 
cuitos eléctricos que pueden estar abier- 
tos o cerrados, o que pueden tener ten- 
siones altas o bajas, en forma de magne- 
tizaciones norte o sur. Es decir, mediante 
sistemas capaces de tomar solamente 
dos estados. Por conveniencia, a uno de 
los estados se le llama «cero» y al otro 
«uno». Un dato cualquiera viene repre- 
sentado siempre, en definitiva, por una 
sucesión de estos elementos binarios. Di- 
cho de otro modo, por una sucesión de 
ceros y unos. 

Es evidente, por consiguiente, que exis- 
te una forma natural de representar la in- 
formación numérica dentro de la memo- 
ria de un ordenador: el sistema binario 
de numeración. Como se sabe, los núme- 
ros se representan en este sistema utili- 
zando únicamente dos cifras diferentes: 
el cero y el uno. Como comparación, 
pensemos que en el sistema decimal de 
numeración, al que estamos acostum- 
brados, los números se representan utili- 
zando diez cifras diferentes. 

¿Cómo construimos los números en el 
sistema decimal? Si los enumeramos to- 
dos sucesivamente, veremos que se 
construyen tomando primero una sola ci- 
fra y haciendo variar ésta del cero al nue- 
ve. Cuando se nos han acabado las ci- 
fras, ponemos un uno en la segunda cifra 
(la de las decenas) y volvemos a repetir 
el proceso de variar la primera cifra del 
cero al nueve. A continuación, sumamos 


una unidad a la segunda cifra y volvemos 
otra vez a variar la primera, y así sucesi- 
vamente. Cada vez que llegamos al final 
del recorrido de una cifra determinada, 
añadimos una unidad a la cifra siguiente 
hacia la izquierda y volvemos al cero en 
la cifra anterior (situada a su derecha). 

Exactamente lo mismo se hace en el 
caso del sistema binario de numeración 
pero aqui no disponemos de diez cifras 
distintas (0, 1, 2, 3, 4, 5, 6, 7, 8, 9), sino tan 
sólo de dos (0 y 1), por lo que las cifras 
de los números van extendiéndose hacia 
la izquierda mucho más de prisa. Veamos 
en la siguiente tabla cómo van generán- 
dose sucesivamente los números bina- 
rios, aplicando el método anterior. Como 
comparación, hemos colocado el equi- 
valente decimal en la columna de la iz- 
quierda de la tabla: 


0 
1 
2 
3 
4 
5 
6 
7 
8 
9 


De la misma forma anterior podrían ge- 
nerarse los números sucesivos de cual- 
quier otra base: la ternaria (basada en 
las cifras O, 1, as la octal (basada en las 
cifras 0, 1, 2, 3, 4, 5, 6, 7), la hexadecimal 
(en un sistema de dieciséis cifras, que 
usualmente se representan con los sim- 
bolos 0, 1,2,3,4,5,6,7,8,9,A,B,C,D, 
E, F), etc. 

Pues bien: como hemos dicho, la forma 
«natural» de representar los números en 
un ordenador es en el sistema binario de 
numeración. Sin embargo, la forma «na- 
tural» de verlos en la pantalla o introdu- 
cirlos en el teclado es el sistema deci- 
mal, que al ordenador le resulta extraño. 
Es preciso, por tanto, convertirlos de un 
sistema a otro. 

Normalmente no tenemos que preocu- 
parnos de realizar este tipo de conversio- 
nes, pues existen programas de ordena- 
dor que nos las hacen automáticamente. 


Los traductores de los lenguajes de pro- 
gramación (compiladores o intérpretes) 
realizan esta función, entre otras muchas. 
Por esta razón podemos olvidarnos casi 
siempre del sistema binario de numera- 
ción y trabajar como si la máquina «en- 
tendiera» nuestros números decimales, 
aun cuando las operaciones se realiza- 
rán siempre dentro de ella en el sistema 
binario. 


Dentro de los ordenadores hay un ele- 
mento, que se llama el microprocesador, 
que, entre otras cosas, está encargado 
de realizar las operaciones aritméticas 
con los datos numéricos. Para ello, dispo- 
ne de una serie de «instrucciones de la 
máquina» elementales, capaces de rea- 
lizar operaciones aritméticas sencillas 
(sumas, restas, multiplicaciones, divisio- 
nes) entre parejas de números represen- 
tados en el sistema binario mediante ten- 
siones eléctricas altas o bajas. Ocurre, 
sin embargo, que estos números tienen 
que tener una longitud determinada, 
pues no podemos construir microprocesa- 
dores que operen con números de cual- 
quier longitud, ya que serían demasiado 
complejos. Por consiguiente, al diseñar 
el microprocesador se decide siempre 
cuántas cifras han de tener los números 
binarios con los que sea capaz de ope- 
rar. En un microprocesador determinado 
se pueden elegir una o más de estas lon- 
gitudes, pero siempre en un número fijo 
y determinado. En general, se operará 
con números binarios que tengan un nú- 
mero de cifras múltiplo de ocho: las lon- 
gitudes más frecuentes son ocho, dieci- 
séis, treinta y dos y sesenta y cuatro. 


¿Qué ocurre si queremos operar con un 
número binario de cinco cifras en un mi- 
croprocesador que sólo puede operar 
con números de ocho cifras? No hay pro- 
blema. En todos los sistemas de numera- 
ción, los ceros a la izquierda no tienen 
valor alguno. Así, en el sistema decimal 
al que estamos acostumbrados, sabe- 
mos que 12345 representa el mismo nú- 
mero que 00012345. Lo mismo sucede en 
el sistema binario. Así, si queremos ope- 
rar con el número binario equivalente al 
decimal 17 (10001) y debemos extender- 
lo a ocho cifras, bastará con añadirle tres 
ceros a la izquierda, convirtiéndolo en 
00010001. 


El problema se presenta si queremos 


operar con números binarios de nueve ci- 
fras en un microprocesador que sólo pue- 
de operar con números de ocho cifras. 
Por ejemplo: sea el número decimal 511, 
cuya representación binaria es 
111111111. Es evidente que no podre- 
mos trabajar con él directamente, pues 
nos sobra una cifra. Siempre es posible 
construir un programa que parta el núme- 
ro en varios trozos (dos, en este caso) y 
realice las operaciones en varios pasos, 
pero esto es preciso programarlo. En 
cambio, si el microprocesador tuviera 
también la posibilidad de operar direc- 
tamente con números binarios de dieci- 
séis cifras (además de con los de 8) bas- 
taía con añadir al número anterior siete 
ceros a la izquierda para resolver total- 
mente el problema. 

¿A dónde vamos a parar con todo 
esto? Al hecho de que, cualquiera que 
sea nuestro ordenador, habrá siempre un 
límite a los números enteros con los que 
pueda operar directamente, que depen- 
derá del número de cifras binarias elegi- 
do en el momento de diseñarlo. Todo 
esto se complica por el hecho de que 
generalmente se introducen convenios 
para representar también con cifras bi- 
narias los números negativos (como el 
sistema del complemento a dos), pero 
no vamos a entrar en ello. Bastará con 
ver, en la tabla siguiente, los límites 
correspondientes a las distintas longitu- 
des utilizadas normalmente, tanto en el 
caso de números estrictamente positivos 
como de números positivos y negativos 
indistintamente. Los límites vienen dados 
en la tabla en el sistema decimal de nu- 
meración. 


127 
32767 


65535 
0 14294967295 | -2147483648 a 2147483647 


-32768 a 


Por supuesto, hasta ahora hemos ha- 
blado únicamente de números enteros. 
Pero es también muy frecuente que de- 
seemos realizar operaciones con núme- 
ros decimales, como los siguientes: 


2,5 
0,0000000001 
123,45 
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o con números enteros que se salgan de 
los límites con los que puede operar 
nuestro ordenador. También es posible 
que, aunque los números con los que 
operamos sean enteros y caigan dentro 
de los límites válidos, el resultado de la 
operación no lo sea. Veamos un ejem- 
plo: 

Sea un ordenador cuyo microprocesa- 
dor puede realizar operaciones con nú- 
meros binarios de dieciséis cifras. Supon- 
gamos que acepta números negativos. 
De acuerdo con la tabla anterior, esto 
significa que podremos operar con los 
números comprendidos entre -32768 y 
32767. Pues bien, supongamos que de- 
seamos sumar los números binarios 
correspondientes a 25000 y 15000. Cada 
uno de ellos está dentro de los límites 
permitidos, pero la suma (40000) se en- 
cuentra fuera del intervalo válido. Es de- 
cir: no podremos representar el número 
40000 con la precisión admitida por 
nuestro ordenador. Con mayor razón 
ocurriría algo semejante si tratáramos de 
multiplicar 1000 por 2000, pues el resul- 
tado es dos millones. 

Para resolver estas situaciones, existen 
dos posibilidades. O bien buscamos un 
microprocesador capaz de trabajar di- 
rectamente con números expresados en 
un sistema de representación interna lla- 
mado «coma flotante», o bien hacemos 
un programa que lo realice. Los dos ca- 
sos se dan en los ordenadores más cono- 
cidos. En el IBM PC, por ejemplo, además 
del microprocesador normal de la má- 
quina (8086, 8088 u 80286), que es ca- 
paz de realizar operaciones con enteros 
de ocho y dieciséis cifras binarias, se 
puede añadir un segundo microprocesa- 
dor (co-procesador matemático 8087 u 
80287), que opera con enteros de trein- 
ta y dos o sesenta y cuatro cifras binarias 
y con varias representaciones en coma 
flotante. En otras máquinas (como el 
Spectrum, por ejemplo) y el mismo IBM 
PC, si no se dispone del co-procesador 
matemático, existen programas que per- 
miten trabajar con números decimales 
expresados en algún sistema de coma 
flotante. Casi todos los intérpretes y com- 
piladores de los principales lenguajes de 
programación los tienen, por lo que no 


tenemos, en principio, que preocupar- 
nos de ellos. Pero en algunos de estos 
lenguajes es importante saber en cuál de 
los sistemas de representación se en- 
cuentra cada una de nuestras variables, 
pues hay operaciones que sólo pueden 
realizarse en determinados casos. Volve- 
remos sobre esto más adelante. 

El sistema de coma flotante, que se uti- 
liza también en numerosas calculadoras 
de bolsillo, consiste en descomponer los 
números en dos partes: la primera (que 
se llama la «mantisa») es el conjunto de 
las cifras del número sin tener en cuenta 
la posición de la coma decimal (por eso 
se llama «coma flotante»), que colocare- 
mos siempre a la derecha de la primera 
cifra del número que sea distinta de 
cero, leyéndolas de izquierda a dere- 
cha. La segunda parte (el exponente) es 
la potencia de diez por la que habría 
que multiplicar la mantisa para obtener 
el número deseado. Por ejemplo, los tres 
números decimales dados anteriormente 
se expresarían en coma flotante así: 


2,5 


00000000001 
123,45 


En efecto: 2,5 es igual a 2,5 multiplica- 
do por 10 elevado a cero. 0,0000000001 
es igual a 1,0 multiplicado por 10 eleva- 
do a -10. Finalmente, 123,45 es igual a 
1,2345 multiplicado por 10 elevado a 2, 
es decir, por 100. Recuérdese que 10 ele- 
vado a un número positivo «n» es igual a 
un uno. seguido por n ceros, y que 10 ele- 
vado a un número negativo, «-n», es 
igual a cero, coma, n-1 ceros y un uno. 
Así, 10 elevado a 3 es 1000 y 10 elevado 
a -3 es 0,001. 

De igual manera que lo hemos defini- 
do para el sistema decimal de numera- 
ción, podemos definir un sistema de 
coma flotante para el sistema binario, y 
es precisamente en esta forma como se 
emplea en numerosas computadoras y 
en los traductores de los lenguajes de 
programación. 


El programa 
Wordstar 


ORDSTAR es uno de 
los procesadores de 
textos más extendl- 
dos del mercado. La 
razón de esta fama 
está basada en dos 
puntos principales: 


— Es un programa 
que está implementado en una gran va- 
riedad de ordenadores, lo cual facilita su 
difusión, hasta haberse convertido casi 
en un estándar. Específicamente existe 
para todos aquellos ordenadores que 
tengan sistema operativo CP/M o 
MS/DOS. 


— Es muy versátil, disponiendo de una 
gran cantidad de comandos y órdenes 
con las que modificar y editar un texto lo 
que resuelve casi todos los problemas y 
formatos que se pueden presentar a la 
hora de crear un texto. 


Una de las principales ventajas del 
WORDSTAR es el “formateo en pantalla”, 
o lo que es lo mismo, el texto que esta- 
mos editando en la pantalla tiene el mis- 
mo aspecto que el que saldrá al impri- 
mirse en papel por la impresora, y cual- 
quier cambio que hagamos en el texto se 
verá reflejado de inmediato en la panta- 
lla viendo el efecto real que produce 
en él. 


APLICACIONES 


TRATAMIENTO DE TEXTOS 


Otra característica importante, aunque 
común a la mayoría de los procesadores 
de texto, es el “WORD WRAP”, que permi- 
te escribir un texto sin preocuparse de 
dónde termina cada línea, ocupándose 
el procesador de pasar la palabra que 
se está escribiendo a la línea siguiente si 
ésta no cabe en la línea, reajustándola 
para que ocupe toda la longitud entre 
los márgenes. 


El Wordstar también permite escribir 
textos muy largos, ya que el almacena- 
miento del texto mientras se está editan- 
do se realiza en el disco, estando el ta- 
maño del documento sólo limitado por la 
capacidad disponible en el disco. 


Además de los comandos comunes a 
los procesadores de texto, dispone de 
una gran cantidad de funciones como: 
funciones de manejo de bloques, bús- 
queda y sustitución, paginación automá- 
tica del texto, varios tipos de justifica- 
ción, tabuladores decimales, varios tipos 
de letra en impresora, etc. 


¡O Estructura del Wordstar 


Las funciones del WORDSTAR están divi- 
didas en menús que agrupan funciones 
similares, cuya estructura general pode- 
mos ver en la figura 1. 


30 APLICACIONES 


9 
de archivo 


* Menú sin archivo 


Nada más empezar con el programa 
entramos en el “MENU SIN ARCHIVO”, en 


MENU 


Comandos Preliminares 
L Cambiar unidad disco estándar 
F Dir. de disco arch. no (Sl) 
H Fijar nivel ayuda 

Comandos Abrir Archivo 
D Abrir archivo documento 
N Abrir archivo no docum. 


P 


SIN ARCHIVO 
Comandos Archivo 


IMPRIMIR arch. 


E RENOMBRAR arch. 
O COPIAR arch. 
Y BORRAR arch. 


el cual podemos realizar una serie de ac- 
ciones globales sobre los archivos de los 
documentos. 


Comandos Sistema 


R Ejec. programa 
X SALIR al sistema 


Opciones WordStar 
M Ejec. MailMerge 
S Ejec. CorrectStar 


Fig. 2. 


a) Comandos preliminares 


Estos comandos nos permiten estable- 
cer el nivel de ayuda y en que lectora de 
discos vamos a abrir un fichero. 


b) Comandos de apertura de archivo 


Con estas órdenes especificamos al 
WORDSTAR cuál va a ser el archivo con el 
que vamos a trabajar, abriendo un docu- 
mento ya existente para corregirlo o 
creando uno nuevo. 


c) Comandos de manejo global de ar- 
chivos 


Estos comandos permiten imprimir, re- 
nombrar, copiar o borrar un archivo cual- 
quiera del disco. 


d) Comandos varios 


Con estas aplicaciones podemos rea- 
lizar una serie de tareas no relacionadas 


directamente con los documentos, como 
ejecutar un programa externo o acabar 
la sesión de manejo del WORDSTAR, esto 
es, salir de la aplicación. 


* Menú principal de edición 


Una vez abierto un archivo en el menú 
anterior, pasamos a este menú, con el 
cual vamos a escribir el texto permitien- 
do una serie de comandos para mover- 
nos dentro y realizar borrados e insercio- 
nes. 


También a partir de este menú tendre- 
mos acceso a los otros menús que nos 
permitirán realizar todas las funciones 
avanzadas del WORDSTAR. 


En el menú principal podemos distin- 
guir las siguientes partes. 


MENU 
Movimiento del cursor Borrar 
“Ss car. izda. “D car. dcha. 76 car. 
“A pal. izda. “F pal. dcha. DEL car iz 
“E lín. arr. “X lín. abajo “T pal dch 
Deslizar: “Y línea 


“Z línea abajo “W línea arr. 
“C pant. arr. “R pant. abajo 


A:PEPET PAG. 1 LIN. 1 COL 01 
PRINCIPAL 


INSERTAR SI 


Otros menús 


(sólo desde pral.) 
*J Ayuda 


Varios 


“1 Tab. “B Recomp. 
“Y INSERTAR SI/NO 


“L Bus./sust. otra “Q Rápido 
RETORNO fin párrafo “0 Pantalla 
“N Insertar RETORNO “K Bloques 
“U Cancelar comando “P Impresión 


Fig. 3. 


a) Comandos de desplazamiento del 
cursor 


Con estos comandos podemos llevar el 
cursor a cualquier parte del texto para vi- 
sualizarlo o realizar modificaciones. 

Permiten borrar caracteres, palabras o 
líneas del texto. 


b) Comandos varios 


Aquí se incluyen la mayoría de los co- 
mandos generales para modificar y 
corregir un texto, cómo reformar un 
párrafo, insertar caracteres en una posi- 
ción, tabuladores, etc. 


MENU 


H  Mostrar/fijar nivel ayuda 

B_ Recomp. párrafo (CONTROL-B) 
F Ind. en colum. más a derecha 
D Comandos punto, contr. impr. 
|. Indice de comandos 


2. Menú de manejo de bloques 


El menú de bloques permite realizar 
una serie de comandos relacionados 
con bloques de texto, como mover, co- 


X  Salv y salir 

Q Abandonar arch 
Poner marcas 

0-9 Ver o no 0-9 


C Copiar y borrar 
V Mover W grabar 
N Columna sí (NO) 


Ss línea estado 

R Regleta 

M Márgenes y tabs. 
P Poner marcas 
V Mover texto 


R Leer Pimprim. 


MENU DE 
Salvar archivo Operac. bloques 
S Salv y contin. B  Princ. K final 
D Salv—listo H Mostrar sí/no 


O Copiar E renomb. “3 Ayuda “K Blog. 
J Borrar “Q Rápido “P Impr. 
Operac. de disco 20 Pantalla 


L Cambiar disco act. 
F  Directoro sí (NO) 


c) Acceso a otros menús 


Estos comandos permiten acceder a 
los restantes menús dentro del modo de 
edición. 


Los menús a los cuales podemos acu- 
dir son: 


1. Menú de ayuda 


Con este menú podemos tener en pan- 
talla una ayuda rápida de cualquier co- 
mando del WORDSTAR, gracias a la cual 
no tendremos necesidad de recurrir al 
manual para consultar alguna duda. 


AYUDA 
Otros menús 

(desde menú pral.) 

“J Ayuda “K Blog. 

“Q Rápido “P Impr. 

“0 Pantalla 

ESPACIO le lleva 

al menú principal. 


Fig. 4. 


piar, borrar o almacenar el bloque. Tam- 
bién permite el manejo de documentos 
completos con funciones de impresión, 
almacenamiento en disco, etc. 


BLOQUES 
Operac. Archivos 


Otros menús 
(desde menú pral.) 


ESPACIO le lleva 
al menú principal 


Flg. 5. 


3. Menú rápido 


Este menú permite realizar rápidamen- 
te alguna de las funciones que aparecen 


en el menú principal, como movimiento 
con saltos más grandes, supresión o 
borrado, búsqueda y sustitución de pala- 
bras, repetición de órdenes, etc. 
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MENU 
Borrar 


Y lín. der 
DEL lín iz 


Movimiento de cursor 


lado. izdo. D lado dcho. 
prin. pant X fondo pant. 
C final arch. 
K final bloque 
W arr. 0-9 marcas ref. 

V últ. búsqueda o bloque 


prin. arch 
prin. blog. 
abajo 
previo 


F Buscar texto 

A Buscar y sustit. 

L Buscar falta ort. 

QA Repetir comando o 
tecla hasta que 
se pulse espacio 


RAPIDO 


Varios Otros menús 


(desde menú pral.) 
“J Ayuda “K Blog. 
“Q Rápido “P Impr. 
“0 Pantalla 
ESPACIO le lleva 
al menú principal. 


Flg. 6. 


4. Menú de impresión 


Este menú contiene los comandos rela- 
cionados con el control de la impresora, 


MENU DE 


Efectos especiales 
(princ. y final) (una vez de cada) 


B Negr. D Doble| H Sobreimpr. carác. 
S Subrayado O Esp. irrompible 

X Tachado F Espacio fantasma 
V Subíndice G Borrado fantasma 


T Sobreíndice RET Sobreimp. línea 


A Paso alternativo 


como pausa de la impresión, salto entre 
lineas, y también con los efectos espe- 
ciales de impresión, como negrilla, sub- 
rayado, etc. 


IMPRESION 
Cambios impresión Otros menús 


(desde Menú pral.) 


N Paso estándar “J Ayuda “K Bloq. 
C Pausa en impresión “Q Rápido  “P Impr. 
Y Cinta otro color “0 Pantalla 


ESPACIO le lleva al menú 
principal. 


Parches usuario 
QA(1) W(2) E(3) R(4) 


Fig. 7. 


5. Menú de formato en pantalla 


Los comandos agrupados en este 
menu permiten el control del aspecto de 


MENU 


Funciones línea 


C Centras texto 
S Poner esp. línea 


Margen y tabs. 


L Poner marg. izdo. 
R Poner marg. dcho. 


X Liberar márgenes 
| Flj. N Borr. tab. 

G Tab. párrafo 

F Regleta des. lín. 


Cambiadores 
W Trans. pal. no (SI) 
T Reg]. lín. no (SI) 


un documento variando su formato. Per- 
mite elegir el tipo de justificación, la po- 
sición de los tabuladores y márgenes, 
control de fin de página, etc. 


PANTALLA 


Otros menús 
“J Ayuda “K Bloq. 
“Q Rápido  “P Impr. 
“0 Pantalla 
ESPACIO le lleva al menú 
principal. 


Más cambiadores 


J Justific. no (SI) 
Y Vari-tabs no (SI) 
H Ay. guión no (SI) 
E Guión aut. sí (NO) 
D Ver impr. no (SI) 
P Sep. pág. no (SÍ) 


Fig. 8. 


Aparte de todos los comandos accesi- 
bles por medio de los menús para el con- 
trol del formato del texto, existe una se- 
rie de órdenes que van incluidas dentro 
del texto y que nos permiten controlar al- 
gunas características de la impresión 
como el formato general de la página, 
que incluye márgenes superior e inferior, 


e izquierdo y derecho. Estos comandos, 
aunque vayan incluidos en el texto, no se 
imprimen y sólo sirven para controlar la 
impresión. 

Para que el WORDSTAR reconozca estos 
comandos, todos ellas van precedidos 
por un punto (.). Y tienen que estar en 
una línea cada uno, sin más texto detrás. 


PASCAL 


AMOS a comentar un 
detalle un poco deli- 
cado de las estructu- 
ras IF-THEN-ELSE; si no 
se ve muy claro aho- 
ra, no hay que alar- 
marse, pues es del 
tipo de cosas que se 
van entendiendo con la práctica. 


if Alto then 


if Bueno then 


else 


if Listo then 


else 


Al llegar al primer ELSE de todos, el 
compilador sobreentiende que corres- 
ponde al último IF sin ELSE, es decir, a «if 
Bueno...»; al llegar al segundo ELSE, el úl- 
timo IF sin ELSE que queda es «if Alto...» y, 
por tanto, le corresponde. 


if Alto then 
begin 


end 
else 


(X Si alto, mirar si es bueno %*) 


writeln (”Es alto y bueno”) 
writeln (”Es alto pero no bueno” ) 


else (X Si no es alto, mirar si es listo %) 


writeln (”No es alto, pero es listo”) 


writeln (*No es alto ni listo”) 


if Bueno then writeln (”Es alto y bueno” ) 


writeln (”No es alto”) 


LA ESTRUCTURA IF-THEN (continuación) 


En el último programa de ejemplo vi- 
mos cómo se podían poner estructuras IF 
dentro de estructuras IF. En estas situacio- 
nes, si el compilador llegase a la palabra 
reservada ELSE, supondría que corres- 
ponde a la última estructura IF que no la 
tuviera todavía. Por ejemplo: 


Si quisiésemos tener una estructura IF 
simple dentro de otra con ELSE, podría- 
mos hacer lo siguiente: 
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Utilizando una secuencia de una sola 
instrucción (lo que en principio podría 
parecer absurdo), las palabras BEGIN y 
END han hecho de «paréntesis» para así 
forzar a que ELSE corresponda a la prime- 
ra estructura IF. 


O La estructura REPEAT 


Hay ocasiones en que se necesita re- 
petir la ejecución de una cierta instruc- 
ción hasta que se cumpla una condición 
dada. Para ello se dispone de la estruc- 
tura REPEAT. Empecemos con un ejemplo: 


program Repite; 
var Cuenta: integer; 


begin 
Cuenta:= 0; 
writeln ("Cuenta= ”, Cuenta); 


repeat 
Cuenta:= Cuenta + 1 
until Cuenta > 5; 


witeln ("Cuenta= *, Cuenta) j3 
end. 


Si ejecutamos este programa, en la 
pantalla del ordenador aparecerá: 


Cuenta:=Cuenta+ 1 


REPEAT 
Repetir 


Cuenta:=Cuenta+ 1 


La instrucción a repetir PUEDE SER DE 
CUALQUIER TIPO, simple o estructurada. 


Cuando la instrucción es una secuen- 
cia, como aquí hay dos palabras reser- 
vadas, REPEAT y UNTIL, por delante y de- 


hasta que 


La estructura REPEAT se compone de las 
palabras reservadas REPEAT y UNTIL, la ins- 
trucción a repetir escrita entre ellas, y, en 
último lugar, la condición por la que se 
debe terminar con las repeticiones y pa- 
sar a lo siguiente. 


Durante la ejecución del programa, al 
llegarse a la estructura REPEAT se ejecuta 
la instrucción que alberga, tras lo cual se 
pasa a evaluar la condición que hay tras 
la palabra reservada UNTIL. Si el resulta- 
do es TRUE, se pasa a lo que hubiera a 
continuación, pero si fuera FALSE, se vol- 
vería a ejecutar la instrucción anterior y 
a evaluar la condición, etc., hasta que 
en algún momento, por fin, el resultado 
fuese TRUE. 


Por tanto, la primera vez que se ejecu- 
ta la instrucción. Cuenta: = Cuenta + 1, la 
variable Cuenta, que valía 0, pasa a va- 
ler 1. Tras eso, el resultado de la expre- 
sión Cuenta > 5 es, por supuesto, FALSE, 
por lo que se volverá a ejecutar Cuenta: = 
= Cuenta + 1 (Cuenta valdrá entonces 2), 
a evaluar Cuenta > 5, etc. 


Por fin, llegará un momento en que 
Cuenta valdrá 5; tras ejecutarse Cuenta: = 
= Cuenta + 1, pasará a valer 6 y enton- 
ces al evaluarse la Cuenta > 5 el resul- 
tado será TRUE, por lo que se pasará a la 
instrucción WRITELN que hay a continua- 
ción. Traduciendo del inglés resulta todo 
muy claro: 


UNTIL Cuenta > 5 


Cuenta mayor que 5 


trás de ella, no hace falta poner BEGIN y 
END para delimitarla. Por tanto, la o las in- 
trucciones a repetir se escriben una de- 
trás de otra separadas por punto y coma 
entre las palabras REPEAT y UNTIL. Probe- 
mos un programa parecido al anterior: 


n 


- program RepiteEscribe; 
var Cuenta: integer; 


begin 
Cuenta:= 0; 


repeat 
writeln (”Cuenta= ”, Cuenta); 
Cuenta:= Cuenta + 1 

until Cuenta > 5 


program Pidelnicial; 


var 
Inicial: char; 
EsLetra: boolean; 


begin 


if not EsLetra then 
until EsLetra; 


Gracias a la estructura REPEAT, se pedi- 
rá la inicial una y otra vez, hasta que sea 
correcta. 

Se ha utilizado la variable EsLetra por- 
que, como la corrección de la letra hay 
que analizarla para avisar en su caso (es- 


repeat (% Repetir pregunta hasta respuesta buena %) 
writeln (” Inicial? ”); 


readin (Inicial); 
EsLetra:= (Inicial >= ”A”) and (Inicial <= YN 


writeln (”Imposible, repita.”) 


writeln(*Letra= ”,Inicial) 


A las situaciones en que un conjunto de 
instrucciones se repite una y otra vez se 
les llama «bucles de programa». 


La condición de salida del bucle (o 
sea, la que decide si hay que seguir re- 
pitiendo o no) puede ser cualquier ex- 
presión que dé un resultado de tipo 
BOOLEAN. 


El conjunto formado por la palabra RE- 
PEAT, la o las instrucciones, la palabra UN- 
TIL y la expresión lógica es a su vez una 
instrucción estructurada (cuya ejecucción 
consiste en repetir las que contiene has- 
ta que se cumpla la condición) y, por 
tanto, se le aplica todo lo dicho hasta el 
momento sobre éstas. 


Con REPEAT podemos controlar los erro- 
res al teclear datos mejor que como lo hi- 
cimos en el programa Secuencia: 


tructura IF), si guardamos el resultado de 
la comparación en ella se evita tener 
que repetirla tras UNTIL. . 


Hay que tener en cuenta dos importan- 
tes aspectos de la estructura REPEAT: 
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1. Si el bloque de instrucciones a re- 
petir no afectara para nada a la condi- 
ción de salida, podríamos tener un «bu- 
cle infinito»: 


repeat 
writeln (Cuenta); 
Cuenta: =Cuenta+1 
until 2=3 


La condición de salida (2=3) nunca se 
cumple y por más que se repitan una y 
otra vez las dos instrucciones del bucle, 
nunca se cumplirá, con lo que la ejecu- 
ción del programa no avanzará nunca: 
tenemos un bucle infinito. (Por cierto, si 
en algún momento se deseara tener un 
bucle infinito deliberadamente, lo mejor 
es escribir REPEAT ... UNTIL FALSE.) 

2. La condición de salida (la expre- 
sión BOOLEAN) se evalúa DESPUES de la 
ejecución de la o las instrucciones del 
bucle. Por ello, aunque el valor fuera TRUE 
ya desde un principio, siempre se ejecu- 
tarán las instrucciones al menos una vez: 


Cuenta:=10; 

repeat 
writeln (Cuenta)3 
Cuenta: =Cuenta+1 

until Cuenta > 5 


Con estas instrucciones aparecería 10 
en la pantalla, aunque la condición para 
no seguir repitiendo el bucle es que 
Cuenta sea mayor que cinco. 


WHILE Cuenta <= 


Mientras 


Es decir, entre las palabras reservadas 
WHILE y DO se escribe la condición de 


Cuenta menor o igual que 5 


Para los casos en que se deba compro- 
bar la condición de salida ANTES de eje- 
cutar las instrucciones del bucle una sola 
vez, se dispone de la estructura WHILE, 
que veremos a continuación. 


O La estructura WHILE 


Esta estructura es similar a la instruc- 
ción REPEAT, con dos diferencias: 


1. La expresión que controla si se 
debe seguir con las repeticiones o no, se 
evalúa ANTES de ejecutar las instruccio- 
nes del bucle. 


2. Se sale del bucle cuando la condi- 
ción deja de cumplirse, es decir, cuando 
el resultado de la expresión de control es 
FALSE. 


Veamos otro ejemplo para ilustrar esto: 


program EjemploWhilej; 
var Cuenta: integer; 


begin 
Cuenta:= 03 


while Cuenta <= 5 do 
begin 

writeln (*Cuenta= ”, Cuenta); 

Cuenta:= Cuenta + 

end 


Este programa actúa igual que Repl- 
teEscribe. Una vez más, la traducción del 
inglés resulta clarificadora. 


DO 


hacer (la instrucción) 


control (una expresión cuyo resultado 
sea de tipo BOOLEAN) y tras todo ello, la 


instrucción a repetir, que puede ser cual- 
quiera, estructurada o no (en el ejemplo 
es una secuencia). 

Durante la ejecución del programa, al 
llegarse a una estructura WHILE se evalúa 
la condición, y si el resultado fuera TRUE, 
se pasaría a ejecutar la instrucción a re- 
petir. Tras ello, se volvería a evaluar la 
condición y a ejecutar la instrucción 
caso de que el resultado hubiese sido 
nuevamente TRUE, etc., hasta que llega- 
se un momento en que el resultado fuera 
FALSE, en cuyo caso se continuaría la 
ejecución del programa con la instruc- 
ción que hubiese a continuación de la 
estructura. 

Por ello, si en el ejemplo se cambiara 
la instrucción Cuenta: = 0 por Cuenta: = 
10, nunca se llegaría a ejecutar el bucle, 
pues ya la primera vez el resultado de la 
condición sería FALSE. 

Nuevamente la estructura en su conjun- 
to es toda ella una instrucción estructu- 
rada. 


NOTA: Si se desea profundizar en estas 


program PotenciasDeDos; 


var 
N, Tope 
Error, 

CabeComoEntero: boolean; 


2 integer; 


begin 
Ni= 2; 


repeat 

Error:= (Tope < 0); 
until not Error; 
CabeComoEntero:= true;z 


begin 
writeln (N:6);3 


writeln (”Se acabó.”) 
end. 


(Xx CabeComoEntero sirve para indicar si al pasar a la 
siguiente potencia nos saldremos de los límites INTEGER *) 
(£ 2 es la primera potencia %) 
(£ Pedir límite hasta que sea correcto: %) 
write ("Límite: *)3 readin (Tope); 


(k Error si límite negativo %) 
if Error then writeln ("No vale. Repita.”) 


while (N <= Tope) and CabeComoEntero do 


CabeComoEntero:= (N <= MaxInt div 2); 
(x Si es TRUE, el siguiente valor es <= que MaxInt %) 


if CabeComoEntero then N:= N x 2 
(X% Cada potencia es igual al doble de la anterior. %) 


cuesitones se puede observar que la ins- 
trucción WHILE equivale a una combina- 
ción de IF y REPEAT: 


(«mientras se dé la condición haz la ins- 
trucción») equivale a: 


IF condición THEN 
REPEAT 


instrucción 
UNTIL NOT condición 


(o sea, «si se da la pep repite la 
instrucción hasta que no se dé»). 

Para terminar, veamos un programa 
que calcula y presenta todas las poten- 
cias de dos menores que un número 
dado: 


3 PASCAL 


El programa lo que tiene que hacer es 
sacar la primera potencia (2) y calcular 
la siguiente (4); tras esto, debe sacar la 
última calculada (4) y calcular la siguien- 
te (8). Todo este proceso debe REPETIRSE 
hasta alcanzar el tope o no poder seguir 
debido a las limitaciones inherentes al 
tipo INTEGER utilizado. Si Tope fuera 1, no 
se debería sacar ni la primera potencia, 
de ahí el empleo de WHILE en vez de RE- 
PEAT. 


Se ha utilizado la variable CabeCo- 
moEntero para evitar calcular un valor 
que se salga de los límites admitidos 
para los números enteros. 

Como ejercicio, podríamos modificar 
el programa para obtener las potencias 
de tres (o mejor, utilizar una constante 
declarada en lugar de 2 para hacerse el 
mínimo de cambios cada vez). Asimismo, 
podríamos utilizar una estructura REPEAT y 
ver la diferencia cuando Tope valga 1. 


¡O Introducción 


P/M es un sistema 
operativo monousua- 
rio y monotarea 
orientado inicialmen- 
te a equipos basados 
en los microprocesa- 
dores Intel 8080 y 
8085, así como Zilog 


Z-80. 

CP/M son las iniciales de Control Pro- 
gram for Microprocessors (programa de 
control para microprocesadores). Fue es- 
crito por Gary Kildall en 1973, cuando tra- 
bajaba para la compañía Intel, al verse 
en la necesidad de trabajar con discos 
flexibles y no tener ningún programa que 
controlase algunas interacciones entre 
el microprocesador y los disquetes. La 
compañía Intel rechazó el proyecto de 
Kildall de continuar desarrollando este 
incipiente sistema operativo, por lo que 
fundó su propia empresa (la que hoy es 
Digital Research Corporation). 

En 1976 Zilog lanza al mercado el mi- 
croprocesador Z-80, y Kildall crea para 
éste la versión 1.4 de CP/M, que es la pri- 
mera versión industrial del programa. 
Esta versión podía trabajar en sistemas 
que tuvieran sólo 16 Kbytes de memoria 
central, ocupando muy poca de esa me- 
moria. 

El éxito obtenido por el microprocesa- 
dor Z-80 hizo que CP/M se hiciera muy 
popular. Al mismo tiempo, la biblioteca 
de programas creados para este sistema 
operativo iba en aumento, lo que tam- 
bién influyó para que los constructores 
de equipos adoptasen CP/M como siste- 
ma operativo para sus máquinas, ya que 
ello significaba disponer para las mismas 
de gran cantidad de software nada más 
sacarlas al mercado. 

En la actualidad, CP/M es el sistema 
operativo indiscutible para equipos ba- 
sados en microprocesadores de 8 bits. En 


OTROS LENGUAJES 


SISTEMAS OPERATIVOS: CP/M 


el ámbito de los 16 bits, sin embargo, se 
ha visto totalmente superado por el 
MS/DOS, en gran parte por la adopción 
de este último por parte de IBM para su 
IBM-PC. 


¡O Estructura de CP/M 


CP/M se divide en 3 módulos principa- 
les: 


— BIOS (Basic Input Output System): Es 
el programa que interactúa directamen- 
te con el hardware de la máquina. Ma- 
neja la consola (teclado y pantalla), el 
disco, la impresora y cualquier otro dis- 
positivo periférico conectado al ordena- 
dor. 


— BDOS (Basic Disk Operating System): 
Es el módulo encargado del manejo del 
disco en lo relativo a ficheros. Controla el 
directorio de ficheros, permite la ubica- 
ción dinámica de espacio, etc. 

— CCP (Console Command Proces- 
sor): Es un intérprete de comandos, y sir- 
ve como interface o “mediador” entre el 
usuario y el resto del sistema operativo. 
Lee las instrucciones tecleadas por el 
usuario y dirige a los demás módulos 
para la realización de las acciones perti- 
nentes. 


Una visión por capas de CP/M sería la 
representada por la figura 1: 


Usuario 


[A Estructura por capas de CP/M. 


so OTROS LENGUAJES 


Otra parte fundamental de CP/M, aun- 
que no es un programa, es la TPA (Transit 
Program Area) o área de programas tran- 
sitorios. Es la zona de memoria donde 
CP/M conserva los programas cargados 
desde disco, con sus datos correspon- 
dientes. 

Para ver cómo se instala CP/M en me- 
moria RAM, supongamos una memoria 
de 64 Kbytes (que es lo típico). En las di- 
recciones más bajas se cargan los pará- 
metros del sistema (rutina de arranque, 
etcétera). Luego viene la TPA, que es lo 
que más espacio ocupa (mientras mayor 
sea ésta, mayor espacio libre tiene el 
usuario para sus programas). Por último, 
en las direcciones más altas se carga el 
CCP, el BDOS y el BIOS. 


Byte 65935 


BIOS 
(Funciones de E/S) 


BDOS 
(Localización del 
espacio en disco) 


CCP. (Intérprete « 
comandos 


TPA 
(Programas y 
datos del 
usuario) 


Byte 0 


lA Mapa de memoria típico de CP/M. 


Comandos del CP/M 


Al igual que MS/DOS, CP/M tiene algu- 
nos comandos internos que están siem- 
pre en memoria RAM, en la zona ocupa- 
da por el CCP. 


Estos son los siguientes: 


— DIR: Visualiza por pantalla el direc- 
torio de un disco. 

— ERA: Borra un fichero almacenado 
en disco. 

— SAVE: Almacena en disco el conte- 
nido de un fichero que está en memoria. 


— TYPE: Visualiza por pantalla el con- 
tenido de un disco. 

— REN: Cambia el nombre de un fiche- 
ro en disco. 


— USER: Define áreas de usuario en el 
directorio. 


Los comandos externos de CP/M resi- 
den en disco en forma de ficheros con la 
extensión “.COM”, y se cargan en la zona 
más baja de la TPA cuando se les invoca. 
Algunos de estos comandos son los si- 
guientes: 


— PIP: Es un programa de intercambio 
entre periféricos. Realiza las funciones 
básicas de copia, carga, impresión y 
combinación de ficheros. 


— STAT: Proporciona diversa informa- 
ción sobre el espacio ocupado en disco 
y la asignación de los dispositivos. 


— LOAD: Carga ficheros en código 
hexadecimal y produce ficheros ejecuta- 
bles. 


— SUBMIT: Carga en memoria un fiche- 
ro de comandos para procesarlos en 
modo “batch”. 


— SYSGEN: Inicializa un disquete y gra- 
ba el CP/M en él. 


— ED: Es un editor de líneas, útil en la 
creación y modificación de ficheros. 


¡O Familia CP/M 


Bajo el nombre de CP/M realmente se 
engloba a toda una familia de sistemas 
operativos y versiones, nacidas todas 
ellas de un tronco común, pero adapta- 
das cada una a distintos entornos y siste- 
mas microinformáticos. 

Básicamente, la familia CP/M se com- 
pone de los siguientes miembros: 


— CP/M 80: Versión 'monousuario y 
monotarea para sistemas basados en los 
microprocesadores de 8 bits 8080, 8085 
y 2-80. 


— CP/M 86: Análoga a la anterior, 
pero para los microprocesadores de 16 
bits 8088 y 8086. 


— CP/M 68K: Versión adaptada al mi- 
croprocesador MCó68000. 


— CP/M 86 concurrente: Versión multi- 
tarea del CP/M 86. 


— MP/M 80 y MP/M 86: Versiones mul- 
tiusuario del CP/M 80 y del CP/M 86, res- 
pectivamente. 
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